仅当存在时删除列

大佬教程收集整理的这篇文章主要介绍了仅当存在时删除列，大佬教程大佬觉得挺不错的，现在分享给大家，也给大家做个参考。

如何解决仅当存在时删除列？

我只想从数据框中删除一列，如果它在那里。

示例：

a <- 1:5
x <- tibble(a,b = a * 2,c = 1)
x %>% SELEct(-'a')
x %>% SELEct(-'d') # Throws an error

我想要一种方法来删除列 a 和 d 仅当它们存在时，因此删除 a 并且尝试删除 d 永远不会发生。我尝试修改 this 解决方案来解决我的问题，但我无法让它工作。

解决方法

library(data.tablE)
a <- 1:5
x <- data.frame(a,b = a * 2,c = 1)
cols <- c("a","d")
my_cols <- intersect(cols,names(X))

setDT(X)[,..my_cols]
#>    a
#> 1: 1
#> 2: 2
#> 3: 3
#> 4: 4
#> 5: 5

大佬总结

以上是大佬教程为你收集整理的仅当存在时删除列全部内容，希望文章能够帮你解决仅当存在时删除列所遇到的程序开发问题。

如果觉得大佬教程网站内容还不错，欢迎将大佬教程推荐给程序员好友。

本图文内容来源于网友网络收集整理提供，作为学习参考使用，版权属于原作者。
如您有任何意见或建议可联系处理。小编QQ：384754419，请注明来意。