output of pmatch changes with vector length in R

Question

I am trying to use pmatch in base R. The following example appears to work as expected:

treat1   <- c(1, 1, 1, 1, 1, 1, 1, 2, 2,