Instruções para a entrada de dados deste exercício

** ALTERNATIVA I **

  * Crie uma planilha no excel ou openoffice
  * Entre os dados em linhas e colunas conforme a disposição mostrada no livro
  * Salve em um diretóro o arquivo em formato texto (txt ou csv)
  * Abra o R neste diretório e utilize os comandos read.table() ou read.csv() - veja o help !!!

** ALTERNATIVA II **

  * digite no R o comando 
<code>
dados<-edit(as.data.frame(NULL))
</code>
e preencha linhas e colunas. Ao clicar nos nomes das variáveis você pode alterá-los.

** ALTERNATIVA III **

  * digite(ou copie e cole) a sequência de comandos abaixo:

<code>
Num<-c(19,4,27,7,14,5,11,10,25,6,16,20,13,15,8,18,12,24,21,22,3,2,23,26,17,9)
Idade<-c(28,15,76,15,21,11,16,16,47,18,40,24,32,31,10,31,31,46,21,39,15,9,75,54,35,18)
Diag<-c(7,52,30,53,3,46,55,54,13,59,20,3,9,9,44,9,10,13,1,17,53,42,30,18,12,58)
Recup<-c(3,45,23,46,2,42,47,47,12,51,11,1,3,3,40,3,4,11,2,8,46,39,22,16,5,50)
Coag<-c('nao','nao','sim','sim','nao','nao','nao','sim','sim','nao','sim','nao','nao','nao','sim',
'sim','sim','sim','sim','sim','sim','nao','sim','nao','sim','sim')
Coag<-as.factor(Coag);summary(Coag)
Tratam<-c(2,1,3,1,2,1,1,1,3,2,3,2,2,2,1,2,2,3,2,3,1,1,3,3,2,2)
Coag<-factor(Coag=='sim',level=c(0,1))
dados<-data.frame(Num,Idade,Diag,Recup,Coag,Tratam); head(dados)
</code>