
24 Ago
2011
24 Ago
'11
20:36
Eu tenho a preferencia de fazer tudo a mao, mas vc pode usar: library(car) table(recode(x, "c('Abobrinha', 'Avião')='Abobrinha ou Avião'; 'Cachorro'='Cachorro'; 'Carro'='Carro'")) b