像SAS宏一样在R中导入数据

Question

在SAS中，我们可以编写用于导入文件的宏。 宏可以采用以下形式：

%MACRO IMPORT_Data(OUT = , FILE = );

        data &OUT ;  
           infile "&INPUT_path.\&File" 
           delimiter = ',' MISSOVER DSD lrecl=32767
           firstobs=2 ;

           input 
              Var1 : $10.
              Var2 : best12.
              Var3 : Percent5.2
              Var4 
              Var5 


           ;
%mend;

一旦有了这个宏，我们只需要更改文件名，然后运行宏即可。 我们不必在每次读取文件时都编写导入文件语法。 有人可以帮我得到R版本吗？ 也非常感谢参考。

Answer 1

您正在寻找一个功能。 用户定义的函数，用于读取指定的csv文件，对一列或多列应用某种格式，然后返回结果。 这是一个例子：

import_macro <- function(file, ...) {
data <- read.csv(file, ...)
# do whatever formatting you need to do. e.g.
data$v1 <- as.numeric(data$var1)
# var1 should be a column in your csv otherwise change it to something else
return(data)
}

然后，您只需运行：

my_data <- import_macro('~/Desktop/file.csv', header = TRUE)

Answer 2

以下代码像在SAS中一样帮助我读取数据。 但是我无法在此处格式化数据。 因此，将答案放入以获得一些有用的意见。

imp<-strmacro(df,var,expr={df<-read.csv("C:\\Users\\RAW_DATA\\var.csv")})

mydata<-imp(mydata,"Import_data")  /* Data set file name*/
View(mydata)