私は、それぞれのエントリにIDタグが付いた4列のdata.frame(tt)を持っています。私はIDごとに、最低でSkinTempデータを分割したいと思います:IDに基づいてすべてのデータを別のdata.frameで分割します。
dput(head(tt,10))
structure(list(id = c("1", "1", "1", "1", "1", "1", "1", "1",
"1", "1"), Time = c(139, 139, 139, 139, 139, 139, 139, 139, 139,
139), SkinTemp = c(29.559, 29.561, 29.563, 29.564, 29.566, 29.568,
29.57, 29.572, 29.574, 29.576), HeartRate = c(33.689, 33.689,
33.689, 33.689, 33.689, 33.689, 33.689, 33.689, 33.689, 33.689
), RespirationRate = c(11.641, 11.641, 11.641, 11.641, 11.641,
11.641, 11.641, 11.641, 11.641, 11.641)), .Names = c("id", "Time",
"SkinTemp", "HeartRate", "RespirationRate"), row.names = c(NA,
10L), class = "data.frame")
私はその後、IDに基づいて、各皮膚温度の最小値が見つかりました:
TempMins <-aggregate(tt$SkinTemp, by=list(minID=tt$id), FUN=min, na.rm=TRUE)
dput(head(TempMins))
私に次を与える:
をstructure(list(minID = c("1", "10", "11", "12", "13", "14"
), x = c(29.559, 21.57, 30.311, 34.754, 20.57, 22.879)), .Names = c("minID",
"x"), row.names = c(NA, 6L), class = "data.frame")
元のデータのすべてのスキン温度(IDでグループ化されたもの)を各IDの最小値でどのように割りますか?
私はこれのための機能があると思うが、私はGoogleのヒットを得ることはできないようだ。
ライブラリ(dplyr); df%>%group_by(id)%>%mutate(SkinTemp/min(SkinTemp)) ' –