Извлечь первые 2 символа в строку

Мне нужно извлечь первые 2 символа в строке, чтобы позже создать распределение бина. вектор:

x <- c("75 to 79", "80 to 84", "85 to 89") 

Я получил это далеко:

substrRight <- function(x, n){
  substr(x, nchar(x)-n, nchar(x))
}

вызвать функцию

substrRight(x, 1)

отклик

[1] "79" "84" "89"

Нужно печатать последние 2 символа, а не первый.

[1] "75" "80" "85"

Ответы на вопрос(3)

Ваш ответ на вопрос