R-重復行

Question

我需要從字符串中提取所有數字，並將它們保存在一個字段中作為列表。 我的代碼是：

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))

但是我得到：

> d
                     dir  x
1                      a  1
2 PJE INDEPENDENCIA 96 5 96
3 PJE INDEPENDENCIA 96 5  5

雖然我需要獲得：

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

我嘗試添加列表，但是沒有用。 如何避免rbind生成所有可能的組合？ 謝謝

Answer 1

您可以嘗試d<-rbind(d, data.frame(dir=DIR , x=toString(X)))