Diviser une chaîne par un nombre quelconque d'espaces

J'ai la chaîne suivante:

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

Je veux partager cette chaîne par les lacunes, mais les écarts ont un nombre variable d'espaces. Est-il possible d'utiliser strsplit() fonction pour séparer cette chaîne et le retour d'un vecteur de 8 éléments, qui a enlevé toutes les lacunes?

Une ligne de code est préféré.

source d'informationauteur Stu

  1. 25

    Suffit d'utiliser strsplit avec \\s+ à split:

    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

    Ou, dans ce cas, scan fonctionne aussi:

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

    strsplit fonction elle-même fonctionne, en utilisant simplement strsplit(ss, " +"): 

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

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

    HTH