#install.packages('rLDCP_1.0.2.zip', repo=NULL) #install.packages("XML") library(rLDCP) current.folder <- system.file("extdata", package="rLDCP") local.folder <- "." list.of.files <- list.files(path = current.folder, full.names = TRUE) file.copy(list.of.files, local.folder) input <- "comfortableroom.xml" output <-"comfortableroom.R" xml2rldcp( input,output) source(output) output_pdf_ext <-"comfortableroom-pdf-ext.R" source(output_pdf_ext) output_mf_ext <-"comfortableroom-mf-ext.R" source(output_mf_ext)