corrected mistake in Tutorial 1, exercise 33

Tutorial_Scripts/RIntro/BIA_T01_RIntro1.Rmd

@@ -132,13 +132,13 @@ Age <- c(29,23,56,35)
 Nationality <- as.factor(c("DE","US","DE","SE"))
 
 # Exercise 33
-students <- data.frame(ID=c(876, 563, 345, 939),
-                       Name=as.character(c("Michael", "Susan", "Hans", "Björn")),
-                       Age=c(29,23,56,35),
-                       Nationality=as.factor(c("DE","US","DE","SE")))
+students <- data.frame(ID=ID,
+                       Name=Name,
+                       Age=Age,
+                       Nationality=Nationality)
 
 # Long command: If you do not use proper datatypes and enhance the data.frame command by "stringsAsFactors = F", data types might not be correct.
-students <- data.frame(ID=as.numeric(876, 563, 345, 939),
+students <- data.frame(ID=as.numeric(c(876, 563, 345, 939)),
                        Name=as.character(c("Michael", "Susan", "Hans", "Björn")),
                        Age=as.numeric(c(29,23,56,35)),
                        Nationality=as.factor(c("DE","US","DE","SE")),