Trabalhando com tabelas de dados no R

R é uma ferramenta estatística que pode ser utilizada para manipular dados e criar gráficos.

Muitas vezes trabalhar com tabelas pode ser prático para manipulação dos dados. Essa explicação é baseada nesta página, inclusive os dados e exemplos são os mesmos traduzidos.

Vamos utilizar o arquivo fumantes.csv como base dos exemplos, que contém dados fictícios de 356 pessoas. A primeiro coluna representa o estado atual da pessoa em relação ao cigarro, podendo ser: fumante, ex-fumante e não fumante. Para cada uma das pessoas existe também a informação sócio-econômica: baixa, média, alta.

Para ler os dados do arquivo e listar o sumário basta utilizar os comandos abaixo:

> dados_fumantes <- read.csv(file='fumantes.csv',sep=',',header=T)
> summary(dados_fumantes)
 Fumante SE 
 Ex-fumante :141 Alta :211 
 Fumante :116 Baixa: 93 
 Não fumante: 99 Média: 52

O comando read.csv lê um arquivo no formato csv e carrega os dados para dentro do R. O comando summary devolve o sumário dos dados informados.

Você pode criar uma tabela a partir dos dados usando o seguinte comando:

> tabela_fumantes <- table(dados_fumantes$Fumante,dados_fumantes$SE)
> tabela_fumantes

 Alta Baixa Média
 Ex-fumante 92 28 21
 Fumante 51 43 22
 Não fumante 68 22 9

Por exemplo podemos ver que existem 51 fumantes da classe socio-ecônomica alta.

Para criar uma tabela de maneira indireta fazemos primeiro uma matrix com os valores e então convertemos para tabela.

> fumantes <- matrix(c(51,43,22,92,28,21,68,22,9),ncol=3,byrow=TRUE)
> colnames(fumantes) <- c("Alta","Média","Baixa")
> rownames(fumantes) <- c("Fumante","Ex-fumante","Não-fumante")
> fumantes <- as.table(fumantes)
> fumantes
 Alta Média Baixa
Fumante 51 43 22
Ex-fumante 92 28 21
Não-fumante 68 22 9

Existem vários formatos para transformar os dados em gráficos. No exemplo seguinte o primeiro comando, barplot, cria um gráfico com barras e o segundo, plot, com caixas.

> barplot(fumantes,legend=T,beside=T,main='Estado de Fumante por Classe Socio-Ecônomica')
> plot(fumantes,main="Estado de Fumante por Classe Socio-Ecônomica")

Leave a Reply

Your email address will not be published. Required fields are marked *