R/example.as.ESS.object.R

Defines functions example.as.ESS.object

Documented in example.as.ESS.object

example.as.ESS.object <- function(){
path.input <- system.file("Input", package="R2GUESS")
path.output <- tempdir()
file.copy(system.file("Output", package="R2GUESS"), path.output, recursive = TRUE)
path.output <- file.path(path.output, "Output")
path.par <- system.file("extdata", package="R2GUESS")
file.par <- "Par_file_example_Hopx.xml"
root.file.output <- "Example-GUESS-Y-Hopx"
label.Y <- c("ADR","Fat","Heart","Kidney")
my.env <- new.env()
data(MAP.file,envir=my.env)
MAP.file <- my.env$MAP.file
modelY_Hopx <-as.ESS.object(dataY="data-Y-ALL-C-CODE.txt",dataX="data-X-C-CODE.txt",path.input=path.input,
                            path.output=path.output,root.file.output=root.file.output,label.X=NULL,
                            label.Y=label.Y,path.par=path.par,file.par=file.par,MAP.file=MAP.file)
return(modelY_Hopx)
}

Try the R2GUESS package in your browser

Any scripts or data that you put into this service are public.

R2GUESS documentation built on May 2, 2019, 1:47 p.m.