data(fire)
attach(fire)
plot(building, contents, pch = 20, xlim = c(0, 95), ylim = c(0, 133),
xlab = "Loss of Building", ylab = "Loss of Contents",
main = "Danish Fire Insurance Claims")
if (FALSE) {
## Confidence intervals for Spearman rho; install the package
## spearmanCI, if not installed
if (!require("spearmanCI")) install.packages("spearmanCI")
spearmanCI(building, contents)
}
Run the code above in your browser using DataLab