Functions to check if an object is of class lpcor, or coerce it if possible.

as.lpcor(...)

Arguments

...

A comma-separated list of matrices to be coerced to a list.

Value

An object of class lpcor.

Examples

# \donttest{ library(metan) library(dplyr)
#> #> Attaching package: 'dplyr'
#> The following objects are masked from 'package:stats': #> #> filter, lag
#> The following objects are masked from 'package:base': #> #> intersect, setdiff, setequal, union
mt_num = mtcars %>% select_if(., is.numeric) lpdata = as.lpcor(cor(mt_num[1:5]), cor(mt_num[1:5]), cor(mt_num[2:6]), cor(mt_num[4:8])) is.lpcor(lpdata)
#> [1] TRUE
# }