我有一个数据框:df=data.frame(sample.id=c(1, 1, 2, 3, 4, 4, 5, 6, 7, 7), sample.type=c(U, S, S, U, U, D, D, U, U, D), cond = c(1.4, 17, 12, 0.45, 1, 7, 1, 9, 0, 14))
我想要一个仅包含同时具有sample.type“ U”和sample.type“ D”的sample.ids行的数据框
新df:df.new=data.frame(sample.id=c(4, 4, 7, 7), sample.type=c(U, D, U, D), cond = c(1, 7, 0, 14))
最简单的方法是什么?复制不起作用,因为它将返回带有U和S以及U和D的sample.id。我无法弄清楚如何为既为sample.type U又为sample.type D的示例ID进行过滤/子集设置。感谢您的任何建议!
答案 0 :(得分:2)
我们可以通过filter
做group
library(dplyr)
df %>%
group_by(sample.id) %>%
filter(all(c("U", "D") %in% sample.type))
# A tibble: 4 x 3
# Groups: sample.id [2]
# sample.id sample.type cond
# <dbl> <fct> <dbl>
#1 4 U 1
#2 4 D 7
#3 7 U 0
#4 7 D 14
答案 1 :(得分:1)
将filter
与any
一起使用
df %>% group_by(sample.id) %>% filter(any(sample.type == 'U') & any(sample.type == 'D'))
# A tibble: 4 x 3
# Groups: sample.id [2]
sample.id sample.type cond
<dbl> <fctr> <dbl>
1 4 U 1
2 4 D 7
3 7 U 0
4 7 D 14
答案 2 :(得分:1)
带有data.table
library(data.table)
setDT(df)
df[, if(all(c('U', 'D') %in% sample.type)) .SD, by = sample.id]