R中多个赋值的简写

Question

我有一些函数可以加载对于清理数据非常重复的数据集。

load_data = function(f){
  data = read.csv(f)
  data$x = (data$a - data$b)/1000
  data$y = (data$c - data$d)/1000
  data$z = (data$e - data$f)/1000
  data
}

R中是否有任何语法糖可以使这个过程不那么冗长？

代码有效，没有性能问题，但是当你必须进行数十次相同的操作时，修改并不是最佳的。

Answer 1

更具可读性/更简洁：

load_data <- function(f){
    within(read.csv(f), {
        x <- (a - b) / 1000
        y <- (c - d) / 1000
        z <- (e - f) / 1000
    })
}