交互式选择数据帧的多行

Question

我有一个包含一些必要行和一些不必要行的数据框。我希望用户能够通过弹出界面确定应删除哪些行。

我可以为一行做到这一点：

df=data.frame(col1=letters[1:10],col2=1:10)

rm=menu(apply(df,1,paste,collapse="  "),graphics=TRUE)

df=df[!rownames(df) %in% rm,];df

但不能将此扩展到多行。

如果有完全不同的解决方案，我也有兴趣听听。

Answer 1

使用select.list而不是menu

rm=select.list(apply(df,1,paste,collapse="  "),graphics=TRUE,multiple=T)

输出不完全相同，但您可以有多个选择（使用ctr +单击）