Zählen Sie die Anzahl der Strings in einer Spalte gemeinsam mit Strings in anderen Spalte

Question

ich folgendes data.frame haben:

V1 | V2 
------+------------ 
a,b,c | x,y,z,w,t,a 
c,d | d,z,c,t 
a,b,d | a,f,t,b,d 

, wo die Anzahl der Saiten in V1 immer unter 3 ist brauche ich eine R-Code, der das sagt, Anzahl der Saiten gemeinsam mit V2:

V1 | V2   | Count 
------+-------------+------ 
a,b,c | x,y,z,w,t,a | 1 
c,d | d,z,c,t  | 2 
a,b,d | a,f,t,b,d | 3 

Answer 1

Try this:

mapply(function(x,y) sum(x %in% y), 
    strsplit(df$V1,",", fixed=TRUE),strsplit(df$V2,",", fixed=TRUE)) 
#[1] 1 2 3 

Daten

df<-structure(list(V1 = c("a,b,c", "c,d", "a,b,d"), V2 = c("x,y,z,w,t,a", 
"d,z,c,t", "a,f,t,b,d")), .Names = c("V1", "V2"), row.names = c(NA, 
-3L), class = "data.frame")