if (FALSE) {
# Example data based on Takeya (1991)
# Sakai Sequential Relation Analysis
# ordering assesed according to the correlation coefficient and mean difference
exdat.ssra <- SSRA(exdat, output = FALSE)
plot(exdat.ssra)
}
Run the code above in your browser using DataLab