tests/diag.r
In fml-fam/craze: Interface for 'fmlr'
suppressMessages(library(craze))
x = matrix(as.double(1:6), 3)
v = c(3.0, 7.0)
x_fml = fmlmat(x)
v_fml = fmlmat(v)
test = as.matrix(diag(x_fml))
truth = diag(x)
stopifnot(all.equal(test, truth))
test = as.matrix(diag(v_fml, 5, 4))
truth = diag(v, 5, 4)
stopifnot(all.equal(test, truth))
fml-fam/craze documentation built on June 6, 2020, 2:05 p.m.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
suppressMessages(library(craze))
x = matrix(as.double(1:6), 3)
v = c(3.0, 7.0)
x_fml = fmlmat(x)
v_fml = fmlmat(v)
test = as.matrix(diag(x_fml))
truth = diag(x)
stopifnot(all.equal(test, truth))
test = as.matrix(diag(v_fml, 5, 4))
truth = diag(v, 5, 4)
stopifnot(all.equal(test, truth))
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Embedding an R snippet on your website
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.