小编Ste*_*eve的帖子

R data.table,选择没有 NA 的列

我这里有一张股票价格表:

https://drive.google.com/file/d/1S666wiCzf-8MfgugN3IZOqCiM7tNPFh9/view?usp=sharing

有些列有 NA,因为该公司不存在(直到后来),或者该公司已倒闭。

我想要做的是:选择没有 NA 的列。我使用 data.table 因为它更快。这是我的工作代码:

example <- fread(file = "example.csv", key = "date")
example_select <- example[, 
                          lapply(.SD, 
                                 function(x) not(sum(is.na(x) > 0)))
                          ] %>%
  as.logical(.)
example[, ..example_select]
Run Code Online (Sandbox Code Playgroud)

是否有更好(更少行)的代码来执行相同的操作?谢谢你!

r data.table

6
推荐指数
2
解决办法
1107
查看次数

在 R 中,如何反转 split()

在 R 中,一旦运行以下代码:

temp <- split(mtcars, mtcars$cyl)
Run Code Online (Sandbox Code Playgroud)

如果我只向其他人发送“临时”...

他可以使用什么代码将“临时”切片放回一起?他不需要使用“cyl”作为列名;他可以使用任何他想要的东西。谢谢!

split r

1
推荐指数
1
解决办法
225
查看次数

data.table join 很难理解

我正在 R 中学习 data.table。这个连接让我困惑了几个小时。有人可以帮我理解吗?

library(data.table)
DT = data.table(x = rep(c("b", "a", "c"), each = 3),
                y = c(1, 3, 6),
                v = 1:9)
DT
#>   x y v
# 1: b 1 1
# 2: b 3 2
# 3: b 6 3
# 4: a 1 4
# 5: a 3 5
# 6: a 6 6
# 7: c 1 7
# 8: c 3 8
# 9: c 6 9
X = data.table(x = c("c", "b"),
               v …
Run Code Online (Sandbox Code Playgroud)

r data.table

0
推荐指数
2
解决办法
76
查看次数

标签 统计

r ×3

data.table ×2

split ×1