R/LeerArchivos.R

Defines functions LeerArchivos

LeerArchivos <- function(Directorio) {
  #Caso a estimar
  Estimacion <- read.csv2(paste(Directorio, "CasoEstimacion.csv", sep = "/"))
  
  #Leyendo Muestra
  Muestra <- read.csv2(paste(Directorio, "DatosMuestra.csv", sep = "/"))
  #Leyendo Parametros de Calculo
  Parametros <- read.csv2(paste(Directorio, "ParametrosCalculo.csv", sep = "/"))
  list("Estimacion" = Estimacion, "Muestra" = Muestra, "Parametros" = Parametros)
}
FMunyoz/Stima documentation built on June 2, 2017, 10:53 a.m.