R/get_Parameter.R

#' @title GetParameter
#'
#' 
#'
#' @param path a list of Lattes CV XML files
#'
#' 
#'
#'
#'
#' @export GetParameter


GetParameter <-function(path){

	parametrosGerais<-fromJSON(path, simplifyVector = FALSE)
	arquivo_de_entrada<-parametrosGerais$global$arquivo_de_entrada
	parametrosEspecificos<-fromJSON(arquivo_de_entrada, simplifyVector = FALSE)


 	 parameters<-new.env(parent=emptyenv())
	 parameters$gerais<-parametrosGerais
	 parameters$especificos<-parametrosEspecificos
 	 parameters
}
brunojus/elattes documentation built on June 6, 2019, 10:01 a.m.