Prints the pattern causality cross-validation results. This function displays the parameters used for cross-validation, the sample sizes, and the summary statistics.
Usage
# S3 method for class 'pc_cv'
print(x, ...)
Examples
data(climate_indices)
X <- climate_indices$AO
Y <- climate_indices$AAO
numberset <- c(100, 150, 200)
cv_results <- pcCrossValidation(X, Y, 3, 2, "euclidean", 1, FALSE, numberset = numberset)
print(cv_results)
#> Pattern Causality Cross-Validation Results
#> ----------------------------------------
#> Parameters:
#> Embedding dimension (E): 3
#> Time delay (tau): 2
#> Metric: euclidean
#> Horizon (h): 1
#> Weighted: FALSE
#> Random: TRUE
#> Bootstrap: 1
#>
#> Sample sizes: 100, 150, 200
#>
#> Results:
#> positive negative dark
#> 100 0.2000 0.2500 0.5500
#> 150 0.2381 0.2619 0.5000
#> 200 0.1613 0.5161 0.3226