在R中设置现有数据帧的每列的单位

根据文件 set_units() 是一个管道友好型函数,默认情况下,该函数希望单位作为符号传递。对于标准评估,使用参数 mode = "standard" .

library(units)
library(purrr)

df = data.frame(1:4, 2:5, 3:6)
units = c("mg/L", "pH", "s")

df %>%
  map2_dfc(units,  ~set_units(.x, .y, mode = "standard"))

# A tibble: 4 x 3
    X1.4  X2.5  X3.6
  [mg/L]  [pH]   [s]
1      1     2     3
2      2     3     4
3      3     4     5
4      4     5     6

你能行

df = data.frame(1:4, 2:5, 3:6)
units = c("mg/L", "pH", "s")
for(i in 1:ncol(df)){
  units(df[ , i]) <- units[i]
}
df

      X1.4   X2.5  X3.6
1 1 [mg/L] 2 [pH] 3 [s]
2 2 [mg/L] 3 [pH] 4 [s]
3 3 [mg/L] 4 [pH] 5 [s]
4 4 [mg/L] 5 [pH] 6 [s]

您提供的代码存在不同的问题。第一 i in length(df) 不会将每个列编号都用于 i 但只有数字 3 就你而言。第二,我不知道 set_units() 函数,但除此之外,此函数的输出未指定给循环中的任何对象。第三,你不需要加倍努力 [[]] 在这里最后,你可以使用 units() 正如在 package documentation:

# The easiest way to assign units to a numeric vector is like this:
x <- y <- 1:4
units(x) <- "m/s" # meters / second