Aula 03 - R - Manipulando Dados

Prévia do material em texto

Linguagens de Programação Aplicada R
Aula 03: Manipulação de Dados
prof.: Sérgio Monteiro, DSc
smonteiro@unicarioca.edu.br
REFORÇANDO A 
APRENDIZAGEM
PONTOS PRINCIPAIS
Linguagem R
Manuais
• https://cran.r-project.org/manuals.html
Linguagem R
Exemplos
#gerar sequência
x <- 1:5
print(x)
# [1] 1 2 3 4 5
#chamar função que não existe
x <- cumsumNaoExiste(x)
# Error in cumsumNaoExiste (x) : could not find function
"cumsumNaoExiste"
Linguagem R
Exemplos
#gerar sequência
x <- 1:5
print(x)
# [1] 1 2 3 4 5
#chamar função que existe
x <- cumsum(x)
print(x)
# [1] 1 3 6 10 15
Linguagem R
Exemplos
#formas equivalentes de gerar sequência
x <- seq_len(25) 
print(x)
y <- 1:25
print(y)
#somar os valores de x acumulativamente
x <- cumsum(x)
print(x)
#imprimir x no gráfico de barras
barplot(x)
Linguagem R
Exemplos (Vetores e Listas)
#dados de entrada
exemplo_vetor <- c(10, 20, 30)
exemplo_lista <- list(a = 10, b = 20, c = 30)
#acessar dados
exemplo_vetor[1]
## [1] 10
exemplo_lista[1]
## $a
## [1] 10
Linguagem R
Exemplos (Vetores e Listas)
#acessar dados “complexos”
exemplo_vetor[[2]]
## [1] 20
exemplo_lista[[2]]
## [1] 20
Linguagem R
Exemplos (Vetores e Listas)
#acessar dados por vetores booleandos
exemplo_vetor[c(FALSE, TRUE, TRUE)]
## [1] 20 30
exemplo_lista[c(FALSE, TRUE, TRUE)]
## $b
## [1] 20
##
## $c
## [1] 30
Linguagem R
Exemplos (Vetores e Listas)
#acessar dados da lista
exemplo_lista$b
## [1] 20
exemplo_lista[["b"]]
## [1] 20
Linguagem R
Exemplos (Dataframes)
#Criar data frame
df <- data.frame(x = c(1, NA, 3))
print(df)
# x
# 1 1
# 2 NA
# 3 3
Linguagem R
Exemplos (Dataframes)
#Substituir dados não-numéricos
df$x[is.na(df$x)] <- 0
print(df)
# x
# 1 1
# 2 0
# 3 3
Linguagem R
Exemplos (Dataframes)
#Criar data frame
dados <- data.frame(renda = c(5, 1, 2),
indice_chave = c("b", "c", "a"),
stringsAsFactors = FALSE)
print(dados)
# renda indice_chave
# 1 5 b
# 2 1 c
# 3 2 a
Linguagem R
Exemplos (Dataframes)
#Manipulando dados. Usando o “.”
. <- dados
. <- .[order(.$indice_chave), , drop = FALSE]
.$renda_acumulada_ordenada <- cumsum(.$renda)
.$fracao_renda <-
.$renda_acumulada_ordenada/sum(.$renda)
resultado <- .
print(resultado)
Linguagem R
Exemplos (Visualizar Dados)
#Visualizar dados. (Vertical)
barplot(resultado$renda_acumulada_ordenada,
main = "Renda Acumulada por categoria",
xlab = "Renda Acumulada",
ylab = "Categoria",
names.arg = resultado$indice_chave,
col = "darkred",
horiz = FALSE)
Linguagem R
Exemplos (Visualizar Dados)
#Visualizar dados. (Horizontal)
barplot(resultado$renda_acumulada_ordenada,
main = "Renda Acumulada por categoria",
xlab = "Renda Acumulada",
ylab = "Categoria",
names.arg = resultado$indice_chave,
col = "darkred",
horiz = TRUE)
Linguagem R
Fatores
É uma sequência de valores, normalmente, utilizados para 
expressar categorias. 
Exemplo
sexo <- c("Masculino", "Feminino", "Feminino", "Feminino",
"Masculino", "Feminino", "Masculino", "Masculino")
fator_sexo <- as.factor(sexo)
print(fator_sexo)
Linguagem R
Tibbles
É uma versão atualizada do dataframe.
Exemplo: massa de dados
idade <- c(44, 25, 30, 36, 37)
sexo <- c("Masculino", "Feminino","Feminino","Feminino",
"Masculino")
fator_sexo <- as.factor(sexo)
df <- data.frame(idade, fator_sexo)
Linguagem R
Tibbles (continuação)
install.packages("tibble")
library(tibble)
tb <- tibble(df)
print(tb)
y1 <- tibble(idade, fator_sexo)
print(y1)
y2 <- tibble(idade, sexo)
print(y2)
Linguagem R
Exercícios
1. Salvar os dados do exemplo idade x sexo usando o tibble
nos arquivos:
– Um arquivo .txt;
– Um arquivo .csv separado por vírgulas;
– Um arquivo .csv separado por “;”;
– Um arquivo .xlsx;