逻辑上匹配不同大小的字符串向量

所以我有几个数据帧都是由多个不同大小的字符串组成的。第一个数据帧中包含所有字符串，所有数据帧都是由该原始帧的子集构成的数据帧。我想要形成一个真/假表格来匹配子集化数据框中的字符串，我不确定如何去做。逻辑上匹配不同大小的字符串向量

x <- c("A", "B", "C") 
y <- c("A", "C") 
z <- c("C") 

> final.data.frame 
    y z 
A 1 0 
B 0 0 
C 1 1

谢谢！

我认为 'Y' 栏应该是'1 0 1' – akrun

谢谢！是的，你是对的，我忘了一个1.在邪恶的力量在你回家的路上变得迷茫和迷失了！ –

我们可以做

res <- sapply(list(y= y, z= z), function(u) as.integer(x %in% u)) 
row.names(res) <- x 
res 
# y z 
#A 1 0 
#B 0 0 
#C 1 1

2017-04-14 19:54:02 akrun

t(sapply(x, function(a) 
    data.frame(y = as.numeric(a %in% y), z = as.numeric(a %in% z)))) 
# y z 
#A 1 0 
#B 0 0 
#C 1 1

2017-04-14 20:11:34

回答