Correct some typos

course/session4/session4.Rmd

@@ -63,7 +63,7 @@ dim(meaudret$spe)
 head(meaudret$spe.names)
 ```
 ---
-The data set contains the abundances of 13 Ephemeroptera species in 20 samples. The measurements have been made in 6 sites at each season along a small French stream (see `?meaudret`)
+The data set contains the abundances of 13 Ephemeroptera species in 20 samples. The measurements have been made in 5 sites at each season along a small French stream (see `?meaudret`)
 
 ```{r}
 head(meaudret$design)

practical/session3/session3.Rmd

@@ -69,9 +69,9 @@ screeplot(acm1, main = " ", xlab = " ")
 plot(acm1, col = TRUE)
 ```
 ---
-# PCA scores on the geographical map
+# MCA scores on the geographical map
 
-* Draw maps of PCA scores on the first two axes
+* Draw maps of MCA scores on the first two axes
 * Interpret the maps to describe the environmental structure of the river
 
 ```{r, fig.dim=c(4,2), include = params$correction, echo = params$correction, results=res.correction}

practical/session4/session4.Rmd

@@ -55,7 +55,7 @@ screeplot(coa1, main = " ", xlab = " ")
 ---
 # Inertia statistics
 
-* Compute the percentage of variation explained bu the first PCA axes
+* Compute the percentage of variation explained by the first COA axes
 
 ```{r, include = params$correction, echo = params$correction, results=res.correction}
 summary(coa1)
@@ -84,7 +84,7 @@ s.value(doubs$xy, coa1$li[, 1:2], pgrid.draw = FALSE, porigin.draw = FALSE,
 ---
 # Principal Component Analysis
 
-PCA can also be applied on the abundance table. Perform PCAon `doubs$fish` table. Should we scale or not?
+PCA can also be applied on the abundance table. Perform PCA on `doubs$fish` table. Should we scale or not?
 
 ```{r, fig.dim=c(3.5, 3.5), include = params$correction, echo = params$correction, results=res.correction}
 pca1 <- dudi.pca(doubs$fish, scale = FALSE, scannf = FALSE)