私は次のデータフレームを持っています
x <- data.frame("treatment"= c(1, 1, 1, 1, 2, 2, 2, 2),
"Time" = c(0, 30, 60, 180, 0, 30, 60, 180),
"cells_alive" = c(500, 470, 100, 20, 476, 310, 99, 2))
この実験では、2つの治療法があり、生きている細胞の数を経時的に測定します。時間0での細胞数は、その処理の初期細胞数です。新しい列で毎回生きている細胞の割合を計算する必要があります。したがって、処理1の場合、500 / 500、470 / 500、100 / 500などになります。これを計算する方法のアイデアはありますか?
ありがとう
require(tidyverse)
x %>%
left_join(x %>% select(treatment, cells_alive) %>%
group_by(treatment) %>%
top_n(1) %>%
ungroup(), by = "treatment") %>%
mutate(cells_alive_per = cells_alive.x/cells_alive.y)
この記事はインターネットから収集されたものであり、転載の際にはソースを示してください。
侵害の場合は、連絡してください[email protected]
コメントを追加