Экспорт data.frame в xlsx

Question

Я работаю с data.frame следующим образом

> ResultsFrame
  Country       Code                                    Description
1   Spain B.SP.03089       A random phrase describing the code info
2      UK D.UK.00035 Another random phrase describing the code info
...

Этот data.frame был получен из списка, подобного

> Results
1 Spain-B.SP.03089-A random phrase describing the code info
2 UK-D.UK.00035-Another random phrase describing the code info

Использование aux <- str_split(Results,"-") и Country <- unlist(aux)[seq(1,length(unlist(aux)),by=3)]и эквивалент для других 2 вар.Как вы знаете, это легко экспортировать в xlsx с помощью write.xlsx()

Так что моя проблема заключается в том, что я хочу экспортировать этот data.frame в xlsx с первым столбцом, который будет Country, 2nd Code иоттуда столбец для каждого слова описания var.Примите во внимание, что фразы имеют разную длину.

Я пытался снова использовать str_split и тому подобное, но я не могу найти решение или даже не потеряться.

Answer 1

Итак, после рекомендаций я решил исправить проблему с помощью двойного цикла for, я пытался сделать это, избегая этого, но это был самый простой способ. Решение заключается в следующем:

> Description <- unlist(aux)[seq(3,length(unlist(aux)),by=3)]
> Description2 <- str_split(Description," ")
> for (i in 1:length(Description2)){
+   for (j in 1:length(Description2[[i]])) Results[i,j+3] <- Description2[[i]][j]
+ }
> Results$Description <- NULL

Последнее предложение просто для того, чтобы опустить колонку по личным потребностям. И окончательные результаты

  Country       Code    V4    V5    V6    V7    V8
1   Spain B.SP.03089 word1 word2 word3  <NA>  <NA>
2      UK D.UK.00035 word1 word2 word3 word4 word5
...

Экспорт этого файла в xlsx дает мне то, что мне нужно.