Extract/Remove portion of an Integer or string with random digits/characters in R

Question

Say I have an integer

x <- as.integer(442009)

or a character string

y <- "a10ba3m1"

How do I eliminate the last two digits/character of integer/string of any length in general ?

Answer 1

substr returns substrings:

substr(x, 1, nchar(x)-2)
# [1] "4420"
substr(y, 1, nchar(y)-2)
# [1] "a10ba3"