R：从对象获取命令行

Question

在R上，我有一个名为X的向量，它看起来像：

  

[1]“ind 30 FLG056_blue”“ind 32 PJK056_blue”“NTC PJK056_blue”“ind 3 PJK056_red”
   [5]“NTC PJK056_red”“ind 1 PJK058_plate1bis”“ind 9 PJK058_plate1bis”“ind 17 PJK058_plate1bis”    [9]“ind 25 PJK058_plate1bis”“ind 2 PJK058_plate1bis”“ind 10 PJK058_plate1bis”“ind 3 PJK058_plate1bis”   [13]“ind 11 PJK058_plate1bis”“ind 4 PJK058_plate1bis”“ind 12 PJK058_plate1bis”“ind 5 PJK058_plate1bis”   [17]“ind 6 PJK058_plate1bis”“ind 7 PJK058_plate1bis”“ind 8 PJK058_plate1bis”“NTC PJK058_plate1bis”
  [21]“ind 1 PJK058_plate2”“ind 2 PJK058_plate2”“ind 3 PJK058_plate2”“ind 27 PJK058_plate2”
  [25]“ind 4 PJK058_plate2”“ind 5 PJK058_plate2”“ind 6 PJK058_plate2”“ind 7 PJK058_plate2”
  [29]“ind 8 PJK058_plate2”“NTC PJK058_plate2”

我想知道是否有一个函数，它会打印命令来获取这个向量，如：

  

“c（”ind 30 FLG056_blue“，”ind 32 PJK056_blue“，”NTC PJK056_blue“，[ETC]）”

为了简单地复制粘贴命令以保留此向量

非常感谢

Answer 1

dput(X)应该可以解决问题。

dput()以可以读回R的形式输出R对象的文本表示。

Answer 2

您可以使用以下内容：

 xs <- unlist(strsplit(x[1], "\" \""))

这将有一个类似的数组：
[1]＆＃34; ind 30 FLG056_blue
[2] ind 32 PJK056_blue
[3] NTC PJK056_blue
[4] ind 3 PJK056_red＆＃34;

然后你需要修复子串......