Fonction substr() de R - Extraire et remplacer des sous-chaînes
La fonction substr() de R est utilisée pour extraire ou remplacer des sous-chaînes à des positions spécifiées dans une chaîne de caractères.
substring() est un alias de substr(), avec essentiellement le même comportement.
La syntaxe de la fonction substr() est la suivante :
substr(x, start, stop) substring(text, first, last = 1000000L)
Description du paramètre :
x/textChaîne d'entrée ou vecteur de chaînes.
start/firstPosition de départ (à partir de 1).
stop/lastPosition de fin.
Exemple
text <- "Hello EXAMPLE"
# Extraire les caractères 2 à 5
result1 <- substr(text, 2, 5)
print(result1)
# Extraire des sous-chaînes d'un vecteur
words <- c("apple", "banana", "cherry")
result2 <- substr(words, 1, 3)
print(result2)
# Remplacer des sous-chaînes
str <- "Hello EXAMPLE"
substr(str, 7, 12) <- "WORLD"
print(str)
# Extraire les caractères 2 à 5
result1 <- substr(text, 2, 5)
print(result1)
# Extraire des sous-chaînes d'un vecteur
words <- c("apple", "banana", "cherry")
result2 <- substr(words, 1, 3)
print(result2)
# Remplacer des sous-chaînes
str <- "Hello EXAMPLE"
substr(str, 7, 12) <- "WORLD"
print(str)
L'exécution du code ci-dessus produit la sortie suivante :
[1] "ello" [1] "app" "ban" "che" [1] "Hello WORLD"
substr() est couramment utilisé pour extraire des informations encodées dans des formats fixes :
Exemple
# Extraire l'année de naissance du numéro de carte d'identité (caractères 7-10)
id_numbers <- c("110101199001011234", "310105198505067890")
birth_years <- substr(id_numbers, 7, 10)
print(paste(Année de naissance :, birth_years))
id_numbers <- c("110101199001011234", "310105198505067890")
birth_years <- substr(id_numbers, 7, 10)
print(paste(Année de naissance :, birth_years))
L'exécution du code ci-dessus produit la sortie suivante :
[1] "出生年份: 1990" "出生年份: 1985"Autres extensions
Exemples du langage R