set.seed(10) x <- rnorm(n = 1000, mean = 10, sd = 10) my_group <- cut(x, breaks = c(-Inf, 15, Inf)) # solution my_sol <- table(my_group)[1]
my_answers <- make_random_answers(my_sol) #check_answers(my_answers)
Usando set.seed(10)
, crie um objeto chamado x
com valores aleatórios da distribuição Normal com média igual a 10 e desvio padrão igual a 10. Usando função cut
, crie outro objeto que defina dois grupos com base em valores de x
maiores que 15 e menores que 15. Qual a quantidade de observações no primeiro grupo?
exams::answerlist(my_answers, markup = "markdown")
extype: num
exsolution: r my_sol
exname: "numeric "
exshuffle: TRUE
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.