3 Fev
2015
3 Fev
'15
14:16
Talvez isso resolva: ======== Transformando variáveis ============= y<-sapply(dados,function(x) all(x%in%c('1','2','3','4','5'))) dados[,y]<-sapply(dados[,y], as.numeric)