CAT=c(rep('Categoria I',60),rep('Categoria II',30),rep('Categoria III',10))
SEXO=c(rep('Feminino',28),rep('Masculino',32),rep('Feminino',20),rep('Masculino',10),rep('Feminino',7),rep('Masculino',3))
dados = cbind(as.data.frame(CAT),as.data.frame(SEXO))
grafico =table(dados$CAT,dados$SEXO)
plot(grafico)
Nesse caso tem como por exemplo minha variável sexo ser azul e a variável categoria ser vermelha?