tests/internals/stats.r

stats_pca(TRUE, TRUE, x, s)
test = s$to_robj()
truth = prcomp(xr, scale.=TRUE, retx=FALSE)$sdev
cmp(test, truth)
fml-fam/fmlr documentation built on Jan. 16, 2022, 9:27 a.m.