Scribd
Carregar
4 visualizações2 páginas

Análise Estatística de Peso de Frangos

Enviado por

nicolas tavares
Direitos autorais
© All Rights Reserved
Levamos muito a sério os direitos de conteúdo. Se você suspeita que este conteúdo é seu, reivindique-o aqui.
Formatos disponíveis
Baixe no formato TXT, PDF, TXT ou leia on-line no Scribd
4 visualizações2 páginas

Análise Estatística de Peso de Frangos

Enviado por

nicolas tavares
Direitos autorais
© All Rights Reserved
Levamos muito a sério os direitos de conteúdo. Se você suspeita que este conteúdo é seu, reivindique-o aqui.
Formatos disponíveis
Baixe no formato TXT, PDF, TXT ou leia on-line no Scribd

---

title: "Atividade 1"


author: "Nicolas Tavares"
date: "2024-04-15"
output:
pdf_document: default
html_document: default

```{r}
[Link]("dplyr")
[Link]("ggplot2")
library(dplyr)
library(ggplot2)

data()
data<-ChickWeight
data

str(data)

#a) Obtenha as estatisticas descritivas para o peso dos frangos (geral).


data%>%
summarise(n=n(),
media=mean(weight),
mediana=median(weight))

#b) Obtenha as estatisticas descritivas para o peso dos frangos de acordo com a
dieta.
print(data%>%
group_by(Diet)%>%
summarise(n=n(),
min=min(weight),
max=max(weight),
range=max-min,
var=var(weight),
dp=sd(weight),
epm=dp/sqrt(n),
cv=dp/mean(weight)*100),digits = 3)

#c) Obtenha as estatisticas descritivas para o peso dos frangos de acordo com o
tempo.
print(data%>%
group_by(Time)%>%
summarise(n=n(),
min=min(weight),
max=max(weight),
range=max-min,
var=var(weight),
dp=sd(weight),
epm=dp/sqrt(n),
cv=dp/mean(weight)*100),digits = 3)

#d) Gere os gráficos Boxplot (geral), Boxplot estratificado de acordo com a dieta e
Boxplot estratificado de acordo com o tempo.
boxplot(data[,1:4],las=1)

data%>%
ggplot(aes(x=Diet,y=weight,color = Diet))+
geom_boxplot()

data%>%
ggplot(aes(x=Time,y=weight,color = Time))+
geom_boxplot()

```

Você também pode gostar