Nothing
# Generated by using Rcpp::compileAttributes() -> do not edit by hand
# Generator token: 10BE3573-1514-4C36-9D1C-5A225CD40393
iterativeDeflationHeuristic <- function(Sigma, r, ks, maxIter = 200L, verbose = TRUE, feasibilityConstraintType = 0L, feasibilityTolerance = 1e-4, stallingTolerance = 1e-8, maxIterTPM = 20L, timeLimitTPM = 20L, restartsAfterFirstIter = 10L) {
.Call('_msPCA_iterativeDeflationHeuristic', PACKAGE = 'msPCA', Sigma, r, ks, maxIter, verbose, feasibilityConstraintType, feasibilityTolerance, stallingTolerance, maxIterTPM, timeLimitTPM, restartsAfterFirstIter)
}
truncatedPowerMethod <- function(Sigma, k, maxIter = 200L, verbose = TRUE, timeLimit = 10L) {
.Call('_msPCA_truncatedPowerMethod', PACKAGE = 'msPCA', Sigma, k, maxIter, verbose, timeLimit)
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.