Add comments to 11 Feb class
Change-Id: I7acdcf00fac877da3b4f39341780d904779eeefe
diff --git a/classes/11feb_practica1.R b/classes/11feb_practica1.R
index 5daa5f6..7310d87 100644
--- a/classes/11feb_practica1.R
+++ b/classes/11feb_practica1.R
@@ -43,7 +43,9 @@
# Coneixement anglès
con_angles = sample(c("Cap", "Baix", "Mitjà", "Alt", "Molt Alt"), n, replace=T, prob=c(2, 7, 40, 30, 21))
+# - Sense especificar l'ordre de les barres:
barplot(table(con_angles))
+# - Especificant un ordre específic de les barres:
barplot(table(con_angles)[c("Cap", "Baix", "Mitjà", "Alt", "Molt Alt")])
# Nombre de germans