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

ALTERNATIVA I

ALTERNATIVA II

dados<-edit(as.data.frame(NULL))
e preencha linhas e colunas. Ao clicar nos nomes das variáveis você pode alterá-los.

ALTERNATIVA III

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)