子集数据框包含其列中的向量列表

Question

我的数据框在其列之一中有列表。我的脚本如下。

 a3 <- c('pr1','pr2','pr3','pr4','pr5')
    inter <- list(c('ip1','ip10'),c('ip3','ip4','ip6'),c('ip5','ip6'),c('ip2','ip3','ip1','ip11'),'ip5')
    inter
    cbn <- cbind(a3,inter)
    mn <- data.frame(cbn)

现在，如果我想根据条件对数据帧进行子集化 在数据帧的第二列，然后如果我写

cnd <- lapply(mn$inter ,function(x) lapply(cmb , function(y) mn[x %in% cmb('ip1','ip10' ,]))  

然后这会给我错误的结果。我想要数据帧列表，我将比较不同的向量，它将给出数据帧的子集作为结果，其中一个值为true或整个向量将保持真值。请提供任何帮助。