[R] looking for .. dec if vector if element > x

[Knut Krueger]

Hi to all,
I am just looking for more efficient ways ;-)

is there a better way instead a loop  to decrease x if greater y
test  <- c(1,3,5,7,9)

decrease if greater 1 to
test2  <- c(1,2,4,6,8)


Kind regards
Knut