R-rbind重复行

我需要从字符串中提取所有数字，并将它们保存在一个字段中作为列表。 我的代码是：

library(stringr)
d<-data.frame(dir='a', x=1)

DIR<-"PJE INDEPENDENCIA 96 5"
X <- str_extract_all(DIR,"\\(?[0-9]+\\)?")[[1]]
d<-rbind(d, data.frame(dir=DIR ,  x=X))

而我需要得到：

                     dir  x
1                      a  1
2 PJE INDEPENDENCIA 96 5 96,5

我尝试添加列表，但没有成功。 如何避免rbind生成所有可能的组合？

---

谢谢

你可以试试你可以试试rbind（d，data.frame（dir=dir，x=I（list（x））或者你可以把x粘贴在一起，即rbind（d，data.frame（dir=dir，x=toString（x））谢谢，但是你能告诉我as.character有什么区别吗？为什么对于as.character我不能做同样的事情？

as.character

将其参数转换为character

toString

将其参数转换为字符并连接元素。

                     dir  x
1                      a  1
2 PJE INDEPENDENCIA 96 5 96,5