如何从字符串中提取主题标签并导出为 csv？

Question

我使用以下函数从文本数据中提取话题标签：

a <- c("#aaa", "#bbb", "#ccc")
hashtag_pat <- "#[a-zA-Z0-9_-ー\.]+"
hashtag <- str_extract_all(a, hashtag_pat)

这是输出：

[[1]]
[1] "#aaa"

[[2]]
[1] "#bbb"

[[3]]
[1] "#ccc"

但是，我无法将其正确导出为 csv。我需要将所有这些单词放在一个单元格中（以空格分隔）。导出这个的最佳方法是什么？以下是 'write.csv' 给我的内容。如果你能帮助解决这个问题，我将不胜感激。

Answer 1

澄清后更新：

df <- data.frame(col1 = paste(a,collapse=" "))
df

            col1
1 #aaa #bbb #ccc

您正在寻找这样的解决方案吗？

hashtag <- sub("^\#", "", a)
write.csv(data.frame(t(unlist(hashtag))), "my_file.csv")

How can I extract hashtags from strings and export as a csv?