tensor_predictors/tensorPredictors/R/det.R

8 lines
151 B
R

#' Determinant of a matrix
#'
#' @export
La.det <- function(A) {
storage.mode(A) <- "double"
.Call("C_det", A, PACKAGE = "tensorPredictors")
}