Em 27 de novembro de 2012 17:47, Sérgio Henrique almeida da silva ju <sergio.edfisica@gmail.com> escreveu:

data$tifo<- ifelse(data$doença=="tifo","sim"não")