Объединить вектор строк / символов

Question

Объединить вектор строк / символов

183

Если у меня есть вектор типа, как я могу конкатенировать значения в строку? Вот как я сделал бы это с помощью paste():

sdata = c('a', 'b', 'c')
paste(sdata[1], sdata[2], sdata[3], sep ='')

дает "abc".

Но, конечно, это работает только в том случае, если я знаю длину sdata раньше времени.

Nick 20 янв. 2010, в 01:19

Источник

Теги:

string

r

5 ответов

30

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

do.call(paste, c(as.list(sdata), sep = ""))

Ken Williams 20 янв. 2010, в 19:15

6

Вы действительно могли бы работать там с оператором apply (). Если вы это сделаете, я буду голосовать за вас;)
JD Long 20 янв. 2010, в 21:17
0

на самом деле это было бы самое элегантное решение, если бы параметр collapse не существовал. так что не так уж много комедийного облегчения, если вы недавно действительно должны были сделать что-то очень похожее :)
flying sheep 06 март 2015, в 09:03

4

Для sdata:

gsub(", ","",toString(sdata))

Для вектора целых чисел:

gsub(", ","",toString(c(1:10)))

Patrick 15 нояб. 2013, в 15:39

4

Это опасный ответ - если в элементах вектора есть запятые-последовательности, этот ответ удалит их.
C8H10N4O2 18 март 2016, в 21:08

2

Вы можете использовать stri_paste функцию с параметром collapse из пакета stringi следующим образом:

stri_paste(letters, collapse='')
## [1] "abcdefghijklmnopqrstuvwxyz"

И некоторые ориентиры:

require(microbenchmark)
test <- stri_rand_lipsum(100)
microbenchmark(stri_paste(test, collapse=''), paste(test,collapse=''), do.call(paste, c(as.list(test), sep="")))
Unit: microseconds
                                      expr     min       lq     mean   median       uq     max neval
           stri_paste(test, collapse = "") 137.477 139.6040 155.8157 148.5810 163.5375 226.171   100
                paste(test, collapse = "") 404.139 406.4100 446.0270 432.3250 442.9825 723.793   100
do.call(paste, c(as.list(test), sep = "")) 216.937 226.0265 251.6779 237.3945 264.8935 405.989   100

bartektartanus 17 авг. 2017, в 15:00

1

Я никогда не проводил тесты для R. Nice, чтобы узнать что-то новое.
Torrien 20 март 2019, в 21:51

2

Ответ Matt Turner - это, безусловно, правильный ответ. Однако, в духе ответа Кен Уильямса, вы также можете:

capture.output(cat(sdata, sep=""))

C8H10N4O2 18 март 2016, в 22:00

Ещё вопросы

Вы действительно могли бы работать там с оператором apply (). Если вы это сделаете, я буду голосовать за вас;)
на самом деле это было бы самое элегантное решение, если бы параметр collapse не существовал. так что не так уж много комедийного облегчения, если вы недавно действительно должны были сделать что-то очень похожее :)
Это опасный ответ - если в элементах вектора есть запятые-последовательности, этот ответ удалит их.
Я никогда не проводил тесты для R. Nice, чтобы узнать что-то новое.

Matt Turner · Accepted Answer · 2010-01-20T01-25-00.000Z

Попробуйте использовать пустой аргумент collapse в функции вставки:

paste(sdata, collapse = '')

Благодаря http://twitter.com/onelinetips/status/7491806343

Просто обратите внимание, что если sdata может содержать либо строки одинаковой длины, либо переменной длины, то для предотвращения непредвиденных результатов следует использовать paste(sdata, sep = '', collapse = '') .