carambola <-c("abacaxi","beterraba")
salada<-c("beringela","batata")