Desculpas pelo título confuso, mas não sei como expressar meu problema de outra forma. Em R, tenho o seguinte problema que quero resolver:

x <- seq(1,1, length.out=10)
y <- seq(0,0, length.out=10)
z <- c(x, y)
p <- c(1,0,1,1,0,0)

Como posso remover o vetor p do vetor z para que o vetor de um novo vetor agora tenha três ocorrências de 1 e três ocorrências 0Menos, então o que devo fazer para chegar ao seguinte resultado? Na solução, a ordem dos 1 e 0 em z não deve importar, elas podem estar em uma ordem aleatória, além de haver outros números envolvidos.

i
> 1 1 1 1 1 1 1 0 0 0 0 0 0 0

Desde já, obrigado!