## Make test data available
data(kola.c)
attach(kola.c)
## Computes summary statistics for the Cu data
fs <- framework.stats(Cu)
fs
## Computes summary statistics for Finnish subset of the Cu data
fs <- framework.stats(Cu[COUNTRY == "FIN"])
fs
## Detach test data
detach(kola.c)
Run the code above in your browser using DataLab