numbers <= c(12,13,11,2,43,54,22)
even<=0
odd<=0
for(num in numbers){
    if (num %% 2 == 0{
        even <- even + 1
    }
    else{
        odd <= odd + 1
    }    
}
cat("Even Numbers:",even,"/n")
cat("Odd Numbers:",odd,"/n")