Substrings

x <- c("Apple", "Banana", "Pear")
str_sub(x, 1, 3)

## [1] "App" "Ban" "Pea"

str_sub(x, -3, -1)

## [1] "ple" "ana" "ear"

str_sub("a", 1, 5)

## [1] "a"