Boa tarde! não consigo chegar nos resultados de desvio padrão, 1,73 e 7,02 de joão e jose respectivamente, informados no video.
Meus resultados foram 1,90 e 7,36.
joao <- c(7,8,9,10,10,11,11,12,13) sd(joao) [1] 1.900292
josé <- c(3,3,6,7,7,10,10,10,11,13,30) sd(josé) [1] 7.362065