Bibliotecas necessárias são essas: library(readr) library(readxl) library(writexl) library(openxlsx)
library(readr)
library(readxl)
library(writexl)
library(openxlsx)
getwd()
## [1] "/cloud/project"
dir()
## [1] "Aula 06-10-25.R" "Aula 06-10-25.Rmd" "Aula-06-10-25.Rmd"
## [4] "project.Rproj"
#Lendo os dados de uma planilha na USP
caixeta <- read.table(file = "http://ecor.ib.usp.br/lib/exe/fetch.php?media=dados:caixeta.csv", sep = ",", header = TRUE)
mean(caixeta$h)
## [1] 90.28238
sd(caixeta$h)
## [1] 35.6042
median(caixeta$h)
## [1] 90
max(caixeta$h)
## [1] 480
min(caixeta$h)
## [1] 5
summary(caixeta$h)
## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 5.00 60.00 90.00 90.28 110.00 480.00
hist(caixeta$h)