Substrings com substr()

substr(x, start, stop) retorna os caracteres de x da posição start até a posição stop, ambas incluídas. As posições começam em 1, como os índices de vetores.

word <- "programming"
print(substr(word, 1, 7))
print(substr(word, 4, 6))

Saída:

[1] "program"
[1] "gra"

Para obter caracteres do final, calcule as posições com nchar():

code <- "INV-2024-0042"
n <- nchar(code)
print(substr(code, n - 3, n))

Saída:

[1] "0042"

Um stop além do fim é limitado ao último caractere, e um start maior que stop resulta em uma string vazia:

print(substr("cat", 2, 10))
print(substr("cat", 3, 1))

Saída:

[1] "at"
[1] ""

substr() funciona em todos os elementos de um vetor de caracteres de uma só vez:

days <- c("Monday", "Tuesday", "Wednesday")
print(substr(days, 1, 3))

Saída:

[1] "Mon" "Tue" "Wed"

A atribuição a substr() sobrescreve os caracteres no próprio lugar. A string mantém seu comprimento:

id <- "user-0000"
substr(id, 6, 9) <- "1234"
print(id)

Saída:

[1] "user-1234"