с integer64?
Возвращает неправильный порядок по code
library(bit64)
library(data.table)
dat <-
structure(list(code = structure(c(1.00092354106555e-314, 9.50119769210366e-315,
9.69027680251205e-315, 9.69045780840206e-315, 9.70594214194474e-315,
9.69583686413e-315, 9.88566954816471e-315, 9.91282487331642e-315,
9.91292220918931e-315, 9.91297410584475e-315), class = "integer64")),
row.names = c(NA, -10L),
class = c("data.table", "data.frame"))
dat[, code_order := order.integer64(code)]
dat
> x <- structure(c(1.00092354106555e-314, 9.50119769210366e-315, + 9.69027680251205e-315, 9.69045780840206e-315, 9.70594214194474e-315, + 9.69583686413e-315, 9.88566954816471e-315, 9.91282487331642e-315, + 9.91292220918931e-315, 9.91297410584475e-315), + class = "integer64") > x[order(x)] integer64 [1] 1923063822 1961333860 1961370496 1962459229 1964504560 2000881792 2006378091 2006397792 2006408296 [10] 2025891801 > order(x[order(x)]) [1] 1 2 3 4 5 6 7 8 9 10
Обсуждают сегодня