我想创建一个新列,该列等于该行所有列的最大值。
这是一个例子:
library(data.table)
data <- data.table(head(iris))
data[ , Species := NULL]
data
Sepal.Length Sepal.Width Petal.Length Petal.Width
1: 5.1 3.5 1.4 0.2
2: 4.9 3.0 1.4 0.2
3: 4.7 3.2 1.3 0.2
4: 4.6 3.1 1.5 0.2
5: 5.0 3.6 1.4 0.2
6: 5.4 3.9 1.7 0.4
我在max
这里不能真正使用该函数,因为它将查找所有列的最大值,例如data[, max_value := max(Sepal.Length, Sepal.Width, Petal.Length, Petal.Width)]
。我想要的是这样的:
Sepal.Length Sepal.Width Petal.Length Petal.Width max_value
1: 5.1 3.5 1.4 0.2 5.1
2: 4.9 3.0 1.4 0.2 4.9
3: 4.7 3.2 1.3 0.2 4.7
4: 4.6 3.1 1.5 0.2 4.6
5: 5.0 3.6 1.4 0.2 5.0
6: 5.4 3.9 1.7 0.4 5.4
我不会保证它的速度,但这至少避免了强制转换为矩阵:
data[,mymax:=do.call(pmax,.SD)]
本文收集自互联网,转载请注明来源。
如有侵权,请联系[email protected] 删除。
我来说两句