Как удалить последние n символов из каждого элемента в векторе R

Я новичок в R, и мне не удалось найти в Интернете простой пример того, как удалить последние n символов из каждого элемента вектора (массива?)

У меня опыт работы с Java, поэтому я хотел бы перебрать каждый элемент a$dataи удалить последние 3 символа из каждого элемента.

Как бы вы это сделали?

Вот пример того, что я бы сделал. Надеюсь, это то, что вы ищете.

char_array = c("foo_bar","bar_foo","apple","beer")
a = data.frame("data"=char_array,"data2"=1:4)
a$data = substr(a$data,1,nchar(a$data)-3)

теперь должен содержать:

  data data2
1 foo_ 1
2 bar_ 2
3   ap 3
4    b 4

Вот способ gsub:

cs <- c("foo_bar","bar_foo","apple","beer")
gsub('.{3}$', '', cs)
# [1] "foo_" "bar_" "ap"   "b"

Хотя это в основном то же самое с ответом @nfmcclure, я предпочитаю использовать stringrпакет, поскольку он предоставляет набор функций, имена которых наиболее согласованы и описательны, чем имена в базе R (на самом деле я всегда гуглил, «как получить количество буквы R ", так как я не могу вспомнить название nchar()).

library(stringr)
str_sub(iris$Species, end=-4)
#or 
str_sub(iris$Species, 1, str_length(iris$Species)-3)

Это удаляет последние 3 символа из каждого значения в Speciesстолбце.

То же самое может быть достигнуто с помощью пакета stringi :

library('stringi')
char_array <- c("foo_bar","bar_foo","apple","beer")
a <- data.frame("data"=char_array, "data2"=1:4)
(a$data <- stri_sub(a$data, 1, -4)) # from the first to the last but 4th char
## [1] "foo_" "bar_" "ap"   "b" 

Подобно @Matthew_Plourde с использованием gsub

Однако при использовании шаблона, который обрезает до нуля символов, т.е. возвращает "", если исходная строка короче, чем количество символов, которые нужно вырезать:

cs <- c("foo_bar","bar_foo","apple","beer","so","a")
gsub('.{0,3}$', '', cs)
# [1] "foo_" "bar_" "ap"   "b"    ""    ""

Разница в том, что {0,3}квантификатор указывает от 0 до 3 совпадений, тогда как {3}требует ровно 3 совпадений, иначе совпадение не найдено, и в этом случае gsubвозвращается исходная неизмененная строка.

NB использование {,3}было бы эквивалентно {0,3}, я просто предпочитаю последнее обозначение.

См. Дополнительную информацию о квантификаторах регулярных выражений: https://www.regular-expressions.info/refrepeat.html