作者热门文章
- html - 出于某种原因,IE8 对我的 Sass 文件中继承的 html5 CSS 不友好?
- JMeter 在响应断言中使用 span 标签的问题
- html - 在 :hover and :active? 上具有不同效果的 CSS 动画
- html - 相对于居中的 html 内容固定的 CSS 重复背景?
我只想从数据框中删除一个列,如果它存在的话。
例子:
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
由 reprex package 创建于 2021-07-09 (v2.0.0)
关于仅当列存在时才将其删除,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/68320773/
我是一名优秀的程序员,十分优秀!