Как найти длину строки в R?

255

Как найти длину строки (количество символов в строке) без разделения ее на R? Я знаю, как найти длину списка, но не строки.

А как насчет строк Unicode? Как найти длину (в байтах) и количество символов (руны, символы) в строке Unicode?

Связанный с нами вопрос:

  • 0
    с помощью метода define () и анонимной функции для возврата последнего элемента | вектор с (8, 4, 0). Ваша анонимная функция должна принимать только один аргумент, который должен | быть переменной x .
Теги:
string
unicode
string-length

6 ответов

316
Лучший ответ

См. ?nchar. Например:

> nchar("foo")
[1] 3
> set.seed(10)
> strn <- paste(sample(LETTERS, 10), collapse = "")
> strn
[1] "NHKPBEFTLY"
> nchar(strn)
[1] 10
Поделиться
  • 49
    Остерегайтесь nchar(NA)
  • 0
    @hadley Действительно, или в этом отношении любой символьный вектор с одним или несколькими NA . (Хотя это задокументировано так).
Показать ещё 5 комментариев
49

Используйте stringi пакет и stri_length функцию

> stri_length(c("ala ma kota","ABC",NA))
[1] 11  3 NA

Почему? Потому что это самый быстрый среди представленных решений:)

require(microbenchmark)
require(stringi)
require(stringr)
x <- c(letters,NA,paste(sample(letters,2000,TRUE),collapse=" "))
microbenchmark(nchar(x),str_length(x),stri_length(x))
Unit: microseconds
           expr    min     lq  median      uq     max neval
       nchar(x) 11.868 12.776 13.1590 13.6475  41.815   100
  str_length(x) 30.715 33.159 33.6825 34.1360 173.400   100
 stri_length(x)  2.653  3.281  4.0495  4.5380  19.966   100

а также отлично работает с NA

nchar(NA)
## [1] 2
stri_length(NA)
## [1] NA
Поделиться
  • 1
    Спасибо за ответ и за отличную библиотеку (это ваша библиотека, если я правильно понял). А как насчет строк Unicode?
  • 1
    Работает нормально тоже. Посмотрите на этот пример: stri_length('\u0105') равна единице, но ... используется stri_numbytes('\u0105') 2 байта
23 
nchar("STRING")

Отъезд this

Поделиться
19

Вы также можете использовать пакет stringr:

library(stringr)
str_length("foo")
[1] 3
Поделиться
5

Параметр keepNA = TRUE предотвращает проблемы с NA

nchar(NA)
## [1] 2
nchar(NA, keepNA=TRUE)
## [1] NA
Поделиться
  • 1
    Начиная с 3.3.1, для базовых значений по умолчанию задано значение nchar(NA) ## [1] NA : см. Nchar RDocumentation
3 
nchar(YOURSTRING)

вам может потребоваться сначала преобразовать в вектор символа;

nchar(as.character(YOURSTRING))
Поделиться
  • 1
    За исключением факторного ввода, приведение выполняется nchar . Для факторных входов nchar выдаст ошибку и, следовательно, сначала вам нужно будет выполнить преобразование, как вы показываете.

Ещё вопросы

Сообщество Overcoder
Наверх
Меню