X <- nnTensor::toyModel("NMF") out <- mySVD(X, k=10) expect_equivalent(dim(out), c(100, 10))
Add the following code to your website.
REMOVE THIS Copy to clipboard
For more information on customizing the embed code, read Embedding Snippets.