====== Comandos em R mostrados durante as aulas ======

=== 17/04 ===

<code R>
## Exemplo de aula, 17/04/2013
## UCI - Machine learning data-sets
## http://archive.ics.uci.edu/ml/datasets.html
##
## Importando dados escolhidos (Auto MGP)
## na.st é o código para dado faltante utilizado no arquivo
## head=F indica que as colunas do arquivo não possuem cabeçalho
auto <- read.table("http://archive.ics.uci.edu/ml/machine-learning-databases/auto-mpg/auto-mpg.data", na.st="?", head=F)

## informações sobr os dados
head(auto)  ## primeiras linhas da tabela de dados 
dim(auto)   ## dimensoes da tabela de dado 
str(auto)   ## strutura de armazenamento dos dados

## atribuindo nomes para as colunas
names(auto) <- c("mpg","cyl","disp","hp","wei","acc","ano","ori","Modelo")
auto$ori <- factor(auto$ori, level=1:3, label=c("US","UE","JP"))

## Resumo de dados contínuos

## I . Medidas
with(auto, mean(mpg)) 
with(auto, range(mpg)) 
with(auto, fivenum(mpg)) 
with(auto, summary(mpg)) 
with(auto, var(mpg)) 
with(auto, sd(mpg)) 

## II. Tabelas
with(auto, table(cut(mpg, br=c(0, 15, 20, 25, 50))))
with(auto, prop.table(table(cut(mpg, br=c(0, 15, 20, 25, 50)))))

## III. Gráficos
with(auto, hist(mpg)) 
with(auto, stem(mpg)) 
with(auto, boxplot(mpg)) 


## Resumos para grupos (no caso mpg para cada ano)
with(auto, tapply(mpg, ano, mean))
with(auto, plot(unique(ano), tapply(mpg, ano, mean), type="l"))
</code>