# \donttest{
data(climate_indices)
dataset <- climate_indices[,-1]
pcmatrix <- pcMatrix(dataset, E = 3, tau = 1, metric = "euclidean", h = 1, weighted = TRUE)
effects <- pcEffect(pcmatrix)
print(effects)
# }
Run the code above in your browser using DataLab