User:Teemu R
Teemu Rintala
THL
R code test
library(OpasnetUtils) #system.time(a <- opbase.data("Op_en5797")) a <- opbase.data("Op_en4713") #system.time(a <- opbase.data("Op_en4713", optim_test = FALSE)) a <- Ovariable("a", a) a <- EvalOutput(a) a <- CheckMarginals(a) print(xtable(summary(a)), type = "html") |