Codigo - Script do que foi rodado no R
library(readxl)
dados <- read_xlsx("notas_falsas.xlsx")
str(dados)
dados$Length
dados$Class
summary(dados[,1:6])
table(dados$Class)
dados$Length[1:100]
dados$Length[101:200]
t.test(Length~Class,
data = dados,
alternative = "two.sided",
mu = 0, paired = FALSE, var.equal = FALSE,
conf.level = 0.95)
t.test(Length~Class,
data = dados,
alternative = "two.sided",
mu = 0, paired = FALSE, var.equal = TRUE,
conf.level = 0.95)
bartlett.test(Length~Class,
data = dados)
boxplot(Length~Class,
data = dados,
xlab = "Categorias",
ylab = "Comprimento",
col = c("red","blue"))
Nenhum comentário:
Postar um comentário