(partial) correlation test
Examples
gzma = sf::read_sf(system.file('extdata/gzma.gpkg',package = 'sdsfun'))
cor_test(gzma$PS_Score,gzma$EL_Score)
#>               correlation              significance upper confidence interval 
#>              3.644956e-01              4.953858e-05              5.115509e-01 
#> lower confidence interval 
#>              1.966957e-01 
cor_test(gzma$PS_Score,gzma$EL_Score,gzma$OH_Score)
#>               correlation              significance upper confidence interval 
#>               -0.05926374                1.00000000                0.12359895 
#> lower confidence interval 
#>               -0.23823372 
