1

audit別のデータ フレーム内の比較でデータ フレームを更新したいと思います。

test:特定の日付の患者数のデータ フレーム:

test <- data.frame(
        date=as.Date(c("2012-12-12","2012-12-29","2013-01-15")),
        patients=c(4,7,3)
)
        date patients
1 2012-12-12        4
2 2012-12-29        7
3 2013-01-15        3

audit:監査日のデータフレーム:

audit <- data.frame(date=as.Date(c("2012-12-31","2013-01-31")),
         count=c(NA))
        date count
1 2012-12-31    NA
2 2013-01-31    NA

Q:患者audit$count総数testUP TOaudit$dateですか?

これは機能しません:

audit$count <- sum(test[test$date < audit$date,]$patients)

どのように行うのが最善ですか?

4

1 に答える 1

2

1 つの方法は、次sapplyの値を使用することですaudit$date

audit$count <- sapply(audit$date, function(x) sum(test$patients[test$date < x]))

        date count
1 2012-12-31    11
2 2013-01-31    14
于 2013-03-18T08:41:02.457 に答える