| Oslo | R Documentation |
The Oslo data set contains chemical concentrations of 332 samples of
different plant species collected along a 120 km transect running through
the city of Oslo, Norway. It is a subset of the
OsloTransect data provided by the rrcov package.
A data frame with 332 observations on the following 14 variables.
sitetransect site ID, a factor with levels
102 103 104 105 106 107 108
109 111 112 113 114 115 116
117 118 119 121 122 123 124
125 126 127 128 129 131 132
133 134 135 136 138 139 141
142 143 144
XCX coordinate, a numeric vector
YCY coordinate, a numeric vector
forestforest type, a factor with levels birspr
mixdec pine sprbir sprpin spruce
weatherweather type, a factor with levels cloud
moist nice rain
litholithological
type, a factor with levels camsed (Cambro-Silurian sedimentary),
gneis_o (Precambrian gneisses - Oslo), gneis_r (- Randsfjord),
magm (Magmatic rocks)
altitudealtitude, a numeric vector
CuCopper, a numeric vector
FeIron, a numeric vector
KPotassium, a numeric vector
MgMagnesium, a numeric vector
MnManganese, a numeric vector
PLead, a numeric vector
ZnZinc, a numeric vector
The OsloTransect contains 360 observations, with 9
observations per site. Only 7 chemical elements were retained from the 25
contained in the OsloTransect data, and these were all
log-transformed, following Todorov and Filzmoser (2009).
Only complete cases on these variables were retained, and two lithological types of low frequency were removed, leaving 332 observations.
Reimann, C., Arnoldussen, A., Boyd, R., Finne, T.E., Koller, F., Nordgulen, Oe., And Englmaier, P. (2007) Element contents in leaves of four plant species (birch, mountain ash, fern and spruce) along anthropogenic and geogenic concentration gradients, The Science of the Total Environment, 377, 416-433.
Todorov V. and Filzmoser P. (2009) Robust statistic for the one-way MANOVA, submitted to the Journal of Environmetrics.
data(Oslo)
table(Oslo$litho)
Oslo.mod <- lm(cbind(Cu, K, Mg, Mn, P, Zn) ~ litho, data=Oslo)
car::Anova(Oslo.mod)
heplot(Oslo.mod, var=c("Cu", "Mn"))
pairs(Oslo.mod)
## Not run:
if(require(candisc)) {
Oslo.can <- candisc(Oslo.mod)
Oslo.can
heplot(Oslo.can)
if(requireNamespace("rgl")){
heplot3d(Oslo.can, shade=TRUE, wire=FALSE, alpha=0.5, var.col="red")
}
}
## End(Not run)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.