Разделить строку на любое количество пробелов

У меня есть следующая строка:

[1] "10012      ----      ----      ----      ----       CAB    UNCH                    CAB"

Я хочу разбить эту строку на промежутки, но пробелы имеют переменное количество пробелов. Есть ли способ использовать функцию strsplit() для разделения этой строки и возврата вектора из 8 элементов, удаливших все пробелы?

Предпочтительна одна строка кода.

Ответ 1

Просто используйте strsplit с \\s+ для разделения:

x <- "10012      ----      ----      ----      ----       CAB    UNCH       CAB"
x
# [1] "10012      ----      ----      ----      ----       CAB    UNCH       CAB"
strsplit(x, "\\s+")[[1]]
# [1] "10012" "----"  "----"  "----"  "----"  "CAB"   "UNCH"  "CAB"  
length(.Last.value)
# [1] 8

Или, в этом случае, scan также работает:

scan(text = x, what = "")
# Read 8 items
# [1] "10012" "----"  "----"  "----"  "----"  "CAB"   "UNCH"  "CAB"

Ответ 2

Функция strsplit сама работает, просто используя strsplit(ss, " +"):

ss = "10012      ----      ----      ----      ----       CAB    UNCH                    CAB"

strsplit(ss, " +")
[[1]]
[1] "10012" "----"  "----"  "----"  "----"  "CAB"   "UNCH"  "CAB"

НТН