首页 > 解决方案 > 如何保存在 r 函数中生成和使用的值以将其保存在环境中?

问题描述

我有一个函数(Save.R),它创建一些变量并将它们保存在一个表中以供进一步使用。

我的主代码中还有一个矩阵,我想用函数中生成的 FileName 替换它的一些单元格。

问题:如何保留 FileName 并将其保存到我的环境中?*我是R新手,请用简单的话解释一下。

我试图输入我的矩阵作为 Save.R 的输入,并在生成 FileName 时替换单元格,但它不起作用。

for (i in 1:435){
  X = subset(NGAW2_Flatfile_Vertical_5percentdamping, grepl(Uniques[i,1], 
             NGAW2_Flatfile_Vertical_5percentdamping$`Station ID  No.`))
  if (nrow(X)==1){
    # Match[count,] = subset(NGAW2_Flatfile_Vertical_5percentdamping, grepl(Uniques[i,1], NGAW2_Flatfile_Vertical_5percentdamping$`Station ID  No.`))
    Match[count,] = X[1,]

    H1 = substring(X[1,113], 10,15)
    H2 = substring(X[1,114], 10,15)
    V = substring(X[1,115], 10,15)
    St.ID = substring(X[1,9], 1, 7)
    Save(H1, H2, V, Match)

    count=count+1
  }
}

Save <- function(H1, H2, V){

  H1 = paste(H1, ".DAT", sep = "")
  data = read.delim(H1, sep = "", header = FALSE)
  When1 = substring(data[2,1],2,11)
  FileName1 = paste("20", When1, "_", St.ID, "_", "H1", sep = "" )

}

标签: r

解决方案


推荐阅读