Nothing
#' Calculate matrix square root for a covariance matrix
#'
#' @param A covariance matrix
#'
calc_sqrt_mat <- function(A) {
rcppeigen_sqrt(A)
}
#' Calculate matrix inverse square root for a covariance matrix
#'
#' @param A covariance matrix
#'
calc_invsqrt_mat <- function(A) {
rcppeigen_invsqrt(A)
}
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.