Atividade infosoc 3.2

Banco de dados

curso <- c("Sociologia","Administração","Administração","Ciências Sociais","Educação","Administração","Comunicação")

uf_origem <- c("Paraná","São Paulo","Paraná","Mato Grosso","São Paulo","São Paulo","Paraná")

uf_destino <- c("Paraná","Paraná","São Paulo","Paraná",rep("São Paulo",3))

idade <- c(24,21,22,22,20,21,20)

tabela <- data.frame(curso, uf_origem, uf_destino, idade)

tabela 
##              curso   uf_origem uf_destino idade
## 1       Sociologia      Paraná     Paraná    24
## 2    Administração   São Paulo     Paraná    21
## 3    Administração      Paraná  São Paulo    22
## 4 Ciências Sociais Mato Grosso     Paraná    22
## 5         Educação   São Paulo  São Paulo    20
## 6    Administração   São Paulo  São Paulo    21
## 7      Comunicação      Paraná  São Paulo    20

2 - Usando o R básico tabela[Linhas, Colunas] , liste os estudantes do curso de Administração e suas idades.

tabela [tabela$curso == "Administração", ] 
##           curso uf_origem uf_destino idade
## 2 Administração São Paulo     Paraná    21
## 3 Administração    Paraná  São Paulo    22
## 6 Administração São Paulo  São Paulo    21

3 - Qual a idade média dos estudantes de Administração (crie o código)?

adm_idade <- tabela[tabela$curso == "Administração", "idade"]

mean(adm_idade)
## [1] 21.33333

4 - Liste os estudantes por curso e estado de origem (crie o código)

tabela [,c("curso", "uf_origem")]
##              curso   uf_origem
## 1       Sociologia      Paraná
## 2    Administração   São Paulo
## 3    Administração      Paraná
## 4 Ciências Sociais Mato Grosso
## 5         Educação   São Paulo
## 6    Administração   São Paulo
## 7      Comunicação      Paraná

5- Liste os estudantes por curso e estado de destino (crie o código)

tabela [,c("curso", "uf_destino")]
##              curso uf_destino
## 1       Sociologia     Paraná
## 2    Administração     Paraná
## 3    Administração  São Paulo
## 4 Ciências Sociais     Paraná
## 5         Educação  São Paulo
## 6    Administração  São Paulo
## 7      Comunicação  São Paulo

6 - Faça ao menos duas outras listagens de seleção de variáveis conforme sua curiosidade

tabela [,c("uf_origem","uf_destino")]       
##     uf_origem uf_destino
## 1      Paraná     Paraná
## 2   São Paulo     Paraná
## 3      Paraná  São Paulo
## 4 Mato Grosso     Paraná
## 5   São Paulo  São Paulo
## 6   São Paulo  São Paulo
## 7      Paraná  São Paulo
tabela [,c("uf_origem", "idade")]
##     uf_origem idade
## 1      Paraná    24
## 2   São Paulo    21
## 3      Paraná    22
## 4 Mato Grosso    22
## 5   São Paulo    20
## 6   São Paulo    21
## 7      Paraná    20