nrow(df1$v1) = 63849
nrow(df2$v2) = 3244
ifelse(df1$v2 == df$v1, 1, 0)
I know this is an easy question but I tried different procedures but none of them are useful,
for(i in 1:nrow(df2)){
for(j in 1:nrow(df1)){
if(df2$v1[i] == df1$v2[j]){
df1$v2<- 1
}
df1$v2 <- 0
}
}
This does the job but it take quiet sometime to get the job done.
Other Methods: Method 1:
df1$v2 <- ifelse(df2$v1 %in% df1$v1, 1,0 )
Error in `$<-.data.frame`(`*tmp*`, v2 , value = c(1, 1, 1, 1, 1, 1, :
replacement has 3244 rows, data has 63849
Method 2:
df1$v2 <- ifelse(do.call(paste0, df2$v1) %in%
do.call(paste0, df1$v1), 1,0 )
summary(df1$v2)
Min. 1st Qu. Median Mean 3rd Qu. Max.
0 0 0 0 0 0
Do suggest me if you have any better solution.