Usage
fsdam(dat, opt_numCode = ncol(dat), opt_seed = 1, opt_model = "n", opt_gpu = 0,
opt_k = 100, opt_nEpochs = 10000,
opt_constr = c("newpenalization", "constrained", "none"),
opt_tuneParam = 10, opt_penfun = "mean", opt_ortho = 1, opt_earlystop = "no",
verbose = FALSE)# S3 method for fsdam
plot (x, which=c("mse", "history", "decoder.func", "scatterplot"),
k=NULL, dim.1=NULL, dim.2=NULL, col.predict=2, ...)