r - 将 .SD 与重命名的变量与 .SD 列的名称相结合
问题描述
在我的代码中,我想以编程方式选择一些变量,并以硬编码的方式选择和重命名其他一些变量。我知道我可以通过两步来实现这一点setnames()
,但我很好奇如何一步完成。
我想我已经很接近它了.SDcols
。但是,当我尝试.SD
与重命名的列组合时,“.SDcols
列”以“.SD.”为前缀。如何避免前缀?
library(data.table)
dt <- as.data.table(mtcars)[1:5]
dt
#> mpg cyl disp hp drat wt qsec vs am gear carb
#> 1: 21.0 6 160 110 3.90 2.620 16.46 0 1 4 4
#> 2: 21.0 6 160 110 3.90 2.875 17.02 0 1 4 4
#> 3: 22.8 4 108 93 3.85 2.320 18.61 1 1 4 1
#> 4: 21.4 6 258 110 3.08 3.215 19.44 1 0 3 1
#> 5: 18.7 8 360 175 3.15 3.440 17.02 0 0 3 2
my_vars <- c("cyl", "vs")
# with .SDcol
dt[, .(.SD, z = gear), .SDcol = my_vars]
#> .SD.cyl .SD.vs z # Note the prefix that had been added to the .SDcols
#> 1: 6 0 4
#> 2: 6 0 4
#> 3: 4 1 4
#> 4: 6 1 3
#> 5: 8 0 3
# with named vector
all_vars <- c(my_vars, z = "gear")
dt[, ..all_vars]
#> cyl vs gear
#> 1: 6 0 4
#> 2: 6 0 4
#> 3: 4 1 4
#> 4: 6 1 3
#> 5: 8 0 3
解决方案
我认为这是因为你.SD
用list
( .()
) 换行。list(.SD)
生成一个list
包含.SD
,而不仅仅是。.SD
然后这与命名混淆。
检查包裹str
在:.SD
list
dt[, str(.(.SD)), .SDcol = my_vars]
# List of 1
# $ :Classes ‘data.table’ and 'data.frame': 5 obs. of 2 variables:
# ..$ cyl: num [1:5] 6 6 4 6 8
# ..$ vs : num [1:5] 0 0 1 1 0
相应的输出具有.SD.
前缀:
dt[ , .(.SD), .SDcol = my_vars]
# .SD.cyl .SD.vs
# 1: 6 0
# 2: 6 0
# 3: 4 1
# 4: 6 1
# 5: 8 0
仅检查str
:.SD
dt[, str(.SD), .SDcol = my_vars]
# Classes ‘data.table’ and 'data.frame': 5 obs. of 2 variables:
# $ cyl: num 6 6 4 6 8
# $ vs : num 0 0 1 1 0
给定基本属性j
- “只要j
返回一个列表,列表的每个元素都会成为结果中的一列data.table
” - 并且.SD
已经是list
(检查dt[ , is.list(.SD)]
),我们可以使用它与其他列表元素c
组合,例如您重命名的列.SD
包裹在list
:
dt[, c(.SD, .(z = gear)), .SDcol = my_vars]
# cyl vs z
# 1: 6 0 4
# 2: 6 0 4
# 3: 4 1 4
# 4: 6 1 3
# 5: 8 0 3
推荐阅读
- ruby-on-rails - 如果块是内联或多行给出的,则 Rails 输出不同
- histogram - 为什么 distplot 中的 kde 看起来像一个正弦波?
- integration - 如何将 Zoho CRM 与 Messagebird 集成
- swift - SwiftUI - 检测 TabView 上的点击以滚动到列表顶部
- kubernetes - 卷写入权限
- javascript - 为什么对变量执行操作会影响 Vanilla JS 中的 DOM?
- java - 使用 RandomAccessFile 读取文件属性
- c++ - CMake:将可执行文件链接到多个库 (*.so)
- python - 排序算法的时间复杂度
- xcode - QtCreator 问题选项卡为空