R中子集的判断问题

3737

收藏 2012-04-06

现在有若干组（假设每组由3个不同元素构成），现在想调用出含有A这个元素的所有组，R中如何实现？

例如
x <- c(c("A", "B", "C"), c("B", "C", "D"), c("A", "C", "D"), c("B", "D", "E"), c("A", "D", "E"))

现在想提取含有A元素的那几个组，并且分别显示这几个组，如何实现？

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

全部回复

qoiqpwqr

2012-4-6 10:29:13

x <- c(c("A", "B", "C"), c("B", "C", "D"), c("A", "C", "D"), c("B", "D", "E"), c("A", "D", "E"))
isA <- matrix(x %in% "A", ncol = 3, byrow = TRUE)
whichrow <- apply(isA, 1, any)
matrix(x, ncol = 3, byrow = TRUE)[whichrow, ]

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

trier2006

2012-4-6 12:19:47

没有现成函数，自己写一下。核心函数：which

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

kk22boy

2012-4-6 22:59:10

好灵活的想法哦

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

mengye02

2013-12-9 23:43:36

好棒啊，mark

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

ntsean

2013-12-11 03:48:47

建议用list存储

x <- list(c("A", "B", "C"), c("B", "C", "D"), c("A", "C", "D"), c("B", "D", "E"), c("A", "D", "E"))
which(sapply(x, function(y) "A" %in% y))

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

分享

扫码加好友，拉您进群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群