Chapter 12 Exercise 10

Log in om je oplossingen te testen.
set.seed(2) x <- matrix(rnorm(20 * 3 * 50, mean = 0, sd = 0.3), ncol = 50) x[1:20, 2] <- 1 x[21:40, 1] <- 2 x[21:40, 2] <- 2 x[41:60, 1] <- 1 true.labels <- c(rep(1, 20), rep(2, 20), rep(3, 20))
Je kunt zo vaak indienen als je wenst. Er wordt enkel rekening gehouden met je laatst ingediende oplossing.
Log in om je oplossingen te testen.