r - 删除 R 中文本行中的编号

Question

我在 R 中获得了输出，我希望将输出复制并粘贴到其他 Microsoft 应用程序中。但是，每一行都有编号。如何删除数字？

例如：

library(stringr)
str_extract_all(x, "“.*?”") %>%
  .[[1]]

[1] “使用肉桂疫霉（Dieback 的致病因子）的蛋白质组学进行基因验证和重塑。”
[2] “种植面积影响意大利硬粒小麦中真菌群落和次生代谢物的存在。”
[3] “小麦对来自 Pyrenophora tritici-repentis 的 ToxB 真菌效应物的遗传分析，棕斑病的致病因子”
[4] “当时间真的就是金钱：小麦病原体中嗜球果伞素抗性突变 G143A 的原位定量Blumeria graminis f. sp. tritici。”

标签： rtextextract

Answer 1

这些行仅在控制台输出中编号。

但不要从那里复制/粘贴。将输出写入文件。例如使用readr::write_lines：

library(stringr)
library(readr)

str_extract_all(x, ".*?") %>%
  .[[1]] %>%
  write_lines(file = "output.txt")