загрузка объекта capture.output в среде R - PullRequest
0 голосов
/ 01 апреля 2020

Я собираю объекты внутри al oop и сохраняю в каталог с помощью функции capture.output. Однако я также хотел сохранить объекты в среде R, чтобы мы могли ими манипулировать после. Вот мой код:

model <- function(trait, site){

  m1 <- lmer(Value ~  Rep + Measure + (1|Entry:Measure) + (1|Entry), 
            data= subset(merged_shade, merged_shade$Trait == trait & merged_shade$Location == site))

  print(varcomp <- VarCorr(m1))
  print(anova(m1))

  blup <- ranef(m1, condVar = TRUE)
  print(blupN <- blup$Entry) 


  name <- print(paste(site, trait, sep="_"))
  name <- gsub(" "," ", name)
  print(name)

  capture.output(print(blupN), file=paste(name,".xls"))

}

model("CoveragePercent", "NCSU") 
model("CoveragePercent", "UF") 
model("CoveragePercent", "UGA") 

...