我有一个日期框架,其中有一列包含代码行。
f1 <- 'paste0("f","q","D",collapse = "")'
f2 <- "q <- rep(NA,10)
for(i in 1:10){
q[i] <- 5+i
}
q"
df <- data.frame(code=c(f1,f2), n=1:2 , lg=c(TRUE,FALSE))
代码可以运行
eval(str2expression(df$code[1]))
eval(str2expression(df$code[2]))
如何正确地将其保存在 a 中csv
,然后读取此帧,以便可以再次运行此代码
pth <- "C:\\Users\\....\\Desktop\\f.csv"
# how to correctly save
write.csv(m, pth, row.names = F, quote = F)
# how to correctly read
df2 <- read.csv(pth)
# so the code can be run again
eval(str2expression(df2$code[1]))
eval(str2expression(df2$code[2]))
保存文件时需要使用引号。
那么它应该是一个有效的 CSV 文件,您可以稍后读取。否则,您将创建一个无效的 CSV 文件(代码中包含逗号,因此这不是明确的分隔符)。