Sottostringhe con substr()

substr(x, start, stop) restituisce i caratteri di x dalla posizione start alla posizione stop, entrambe incluse. Le posizioni iniziano da 1, come gli indici dei vettori.

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

Output:

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

Per prendere i caratteri dalla fine, calcola le posizioni con nchar():

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

Output:

[1] "0042"

Un stop oltre la fine viene limitato all’ultimo carattere, e uno start maggiore di stop restituisce una stringa vuota:

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

Output:

[1] "at"
[1] ""

substr() funziona contemporaneamente su ogni elemento di un vettore di caratteri:

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

Output:

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

Assegnare a substr() sovrascrive i caratteri direttamente. La stringa mantiene la sua lunghezza:

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

Output:

[1] "user-1234"