R语言中integer64类型转double的正确方法问询

核心问题分析 #

你之前的尝试失败，是因为直接对整个tibble/数据框调用as.double()/as.integer()，实际读取的是数据框的底层存储值，而非integer64列对应的真实计数。必须针对单个integer64类型的列进行转换操作。

必备前提 #

首先确保加载bit64包（integer64类型由该包定义）：

library(bit64)

单个对象的转换方法 #

针对你提供的unchgsum示例，正确的转换方式如下：

# 提取integer64列并转换为字符串（避免科学计数法，完整保留数值）
correct_char <- as.character(unchgsum$n)

# 转换为double（适合超出R整数范围的大数，但注意极端大数可能有精度损失）
correct_double <- as.double(unchgsum$n)

# 转换为整数（仅适用于数值在R整数范围内：≤2^31-1）
correct_int <- as.integer(unchgsum$n)

# 格式化显示完整数值（不改变类型，仅调整输出样式）
format(unchgsum$n, scientific = FALSE)

批量处理以sum结尾的对象 #

如果你需要批量处理所有名称以sum结尾的对象，可以使用以下脚本：

library(bit64)
library(dplyr)

# 批量转换函数
convert_int64_objects <- function(pattern) {
  # 获取符合命名规则的对象名
  target_names <- ls(pattern = pattern)
  
  for (name in target_names) {
    obj <- get(name)
    # 识别对象中的integer64列
    is_int64 <- sapply(obj, function(col) inherits(col, "integer64"))
    
    if (any(is_int64)) {
      # 将integer64列转换为字符串（可替换为as.double/as.integer）
      obj <- obj %>% mutate(across(which(is_int64), as.character))
      # 更新全局环境中的原对象
      assign(name, obj, envir = .GlobalEnv)
    }
  }
}

# 调用函数处理所有以sum结尾的对象
convert_int64_objects("sum$")

注意事项 #

• 对于超大数值（如你示例中的1151515151515165），由于超出R原生整数的范围（最大为2^31-1），不建议转换为整数类型，优先选择字符串或double类型存储。
• 如果仅需避免显示科学计数法，无需转换类型，直接用format(x, scientific = FALSE)即可。

内容的提问来源于stack exchange，提问作者ponyhd