Write all zeros from vector in R

Question

I have one vector, example x=c(0,0,0,1,1,2,3,4,5,6). I want write out all zeros, all ones and next all numbers divisible by 2. The output would look like this: 0 0 0 1 1 2 4 6 I don't know how to write out zeros and ones, because next I use (which (x %% 2==0)). Can anyone help?

Answer 1

We can try with %% and use |

x[x%%2==0 | x==1]
#[1] 0 0 0 1 1 2 4 6