Regex R:删除dataframe中的列表类型

Regex R:删除dataframe中的列表类型,regex,r,list,Regex,R,List,我有一个列表类型的数据,它作为dataframe被移入,尽管它是以列表的形式存储在dataframe中 代码:(列表到数据帧) 预期结果: text 1 qlikview, gpa, access, gpa, access, access, qlikview, gpa, access, gpa 2 report, qlikview, gpa, access, qlikview, gpa, access, qlikview, gpa, access 3 qlikview, gpa, a

我有一个列表类型的数据,它作为dataframe被移入,尽管它是以列表的形式存储在dataframe中

代码:(列表到数据帧)

预期结果:

text
1   qlikview, gpa, access, gpa, access, access, qlikview, gpa, access, gpa
2   report, qlikview, gpa, access, qlikview, gpa, access, qlikview, gpa, access
3   qlikview, gpa, access, gpa, access, access, qlikview, gpa, access, gpa
4   qlikview, gpa, access, gpa, access, access, qlikview, gpa, access, gpa
5   report, qlikview, gpa, access, access, gpa, access, qlikview, gpa, access, access, gpa, qlikview, gpa, access, qlikview, gpa, access
6   report, qlikview, access, access, report, qlikview, access, access, gpa, qlikview, access, access, qlikview, access, access
7   report, report, access, access, report, report, report, report, report, report, data, data, report, access, report, report
8   report, qlikview, gpa, access, gpa, access
我可以在这里使用正则表达式来删除c(“”)

尝试这样做吗

library('stringr')
apply(data, 1, function(x) str_c(x$columnnane,collapse=','))
其中,data是dataframe,columnname是包含列表的列


编辑答案

out = do.call(rbind, lapply(data, function(x) str_c(x,collapse=', ')))
其中数据是列表对象

如果列表存储在数据框中,则像下面这样传递列以代替上面的数据

out = do.call(rbind, lapply(data$columnname, function(x) str_c(x,collapse=', ')))
它会给你这个。我希望这就是你要找的

出去 [,1]
[1,]“qlikview,gpa,access,gpa,access,access,qlikview,gpa,access,gpa”
[2,]“报告,qlikview,gpa,访问,qlikview,gpa,访问,qlikview,gpa,访问”
[3,]“qlikview,gpa,access,gpa,access,access,qlikview,gpa,access,gpa”
[4,]“qlikview,gpa,access,gpa,access,access,qlikview,gpa,access,gpa”
[5,]“报告,qlikview,gpa,access,access,gpa,access,qlikview,gpa,access,access,gpa,qlikview,gpa,access,access,qlikview,gpa,access” [6,]“报告,qlikview,访问,访问,报告,qlikview,访问,访问,gpa,qlikview,访问,访问,qlikview,访问,访问”
[7,]“报告,报告,访问,访问,报告,报告,报告,报告,报告,数据,数据,报告,访问,报告,报告”
[8,]“报告,qlikview,gpa,访问,gpa,访问”
[9,]“报告、gpa、访问、访问、gpa、gpa、gpa、gpa、gpa、访问、gpa、gpa、gpa、报告”
[10,]“报告,gpa,gpa,访问,gpa,访问,gpa,访问,gpa,gpa,报告,gpa,gpa,访问,gpa,gpa,gpa,gpa,gpa”

你可以试试这个

数据

    $text
$text[[1]]
 [1] "qlikview" "gpa"      "access"   "gpa"      "access"   "access"   "qlikview" "gpa"      "access"  
[10] "gpa"     

$text[[2]]
 [1] "report"   "qlikview" "gpa"      "access"   "qlikview" "gpa"      "access"   "qlikview" "gpa"     
[10] "access"  

$text[[3]]
 [1] "qlikview" "gpa"      "access"   "gpa"      "access"   "access"   "qlikview" "gpa"      "access"  
[10] "gpa"     

$text[[4]]
 [1] "qlikview" "gpa"      "access"   "gpa"      "access"   "access"   "qlikview" "gpa"      "access"  
[10] "gpa"     

$text[[5]]
 [1] "report"   "qlikview" "gpa"      "access"   "access"   "gpa"      "access"   "qlikview" "gpa"     
[10] "access"   "access"   "gpa"      "qlikview" "gpa"      "access"   "qlikview" "gpa"      "access"  

$text[[6]]
 [1] "report"   "qlikview" "access"   "access"   "report"   "qlikview" "access"   "access"   "gpa"     
[10] "qlikview" "access"   "access"   "qlikview" "access"   "access"  

$text[[7]]
 [1] "report" "report" "access" "access" "report" "report" "report" "report" "report" "report" "data"  
[12] "data"   "report" "access" "report" "report"

$text[[8]]
[1] "report"   "qlikview" "gpa"      "access"   "gpa"      "access"  

$text[[9]]
 [1] "report" "gpa"    "access" "access" "gpa"    "gpa"    "gpa"    "gpa"    "gpa"    "access" "gpa"   
[12] "gpa"    "gpa"    "report"

$text[[10]]
 [1] "report" "gpa"    "gpa"    "access" "gpa"    "access" "gpa"    "access" "gpa"    "gpa"    "report"
[12] "gpa"    "gpa"    "access" "gpa"    "gpa"    "gpa"    "gpa"    "gpa"  

dput(O$text[1:10])
list(c("qlikview", "gpa", "access", "gpa", "access", "access", 
"qlikview", "gpa", "access", "gpa"), c("report", "qlikview", 
"gpa", "access", "qlikview", "gpa", "access", "qlikview", "gpa", 
"access"), c("qlikview", "gpa", "access", "gpa", "access", "access", 
"qlikview", "gpa", "access", "gpa"), c("qlikview", "gpa", "access", 
"gpa", "access", "access", "qlikview", "gpa", "access", "gpa"
), c("report", "qlikview", "gpa", "access", "access", "gpa", 
"access", "qlikview", "gpa", "access", "access", "gpa", "qlikview", 
"gpa", "access", "qlikview", "gpa", "access"), c("report", "qlikview", 
"access", "access", "report", "qlikview", "access", "access", 
"gpa", "qlikview", "access", "access", "qlikview", "access", 
"access"), c("report", "report", "access", "access", "report", 
"report", "report", "report", "report", "report", "data", "data", 
"report", "access", "report", "report"), c("report", "qlikview", 
"gpa", "access", "gpa", "access"), c("report", "gpa", "access", 
"access", "gpa", "gpa", "gpa", "gpa", "gpa", "access", "gpa", 
"gpa", "gpa", "report"), c("report", "gpa", "gpa", "access", 
"gpa", "access", "gpa", "access", "gpa", "gpa", "report", "gpa", 
"gpa", "access", "gpa", "gpa", "gpa", "gpa", "gpa"))
dd <- list(c("qlikview", "gpa", "access", "gpa", "access", "access",
"qlikview", "gpa", "access", "gpa"), c("report", "qlikview",
"gpa", "access", "qlikview", "gpa", "access", "qlikview", "gpa",
"access"), c("qlikview", "gpa", "access", "gpa", "access", "access",
"qlikview", "gpa", "access", "gpa"), c("qlikview", "gpa", "access",
"gpa", "access", "access", "qlikview", "gpa", "access", "gpa"
), c("report", "qlikview", "gpa", "access", "access", "gpa",
"access", "qlikview", "gpa", "access", "access", "gpa", "qlikview",
"gpa", "access", "qlikview", "gpa", "access"), c("report", "qlikview",
"access", "access", "report", "qlikview", "access", "access",
"gpa", "qlikview", "access", "access", "qlikview", "access",
"access"), c("report", "report", "access", "access", "report",
"report", "report", "report", "report", "report", "data", "data",
"report", "access", "report", "report"), c("report", "qlikview",
"gpa", "access", "gpa", "access"), c("report", "gpa", "access",
"access", "gpa", "gpa", "gpa", "gpa", "gpa", "access", "gpa",
"gpa", "gpa", "report"), c("report", "gpa", "gpa", "access",
"gpa", "access", "gpa", "access", "gpa", "gpa", "report", "gpa",
                           "gpa", "access", "gpa", "gpa", "gpa", "gpa", "gpa"))

添加一个
粘贴
到字符串
中的某个位置,将所有内容折叠成一个字符串?您可以尝试使用第行
noquote
中的内容。您计划如何处理预期结果?看起来不太理想。不,我已经试过了,没有什么帮助!“升级前”具体与什么相关?
列表
作为
数据框中的列
?您开始提问时使用的“O”对象?这对于
列表非常有效
,但我的问题是dataframe中的列表类型。您可以
dput
您的dataframe或其一部分吗?这可以用于for list,但该列表可以转换为dataframe吗?我尝试过这样做,但不支持您为什么要这样做?我必须将其存储在dataframe中以供进一步使用,如果您使用
R GUI
它工作得很好,但是当在
RStudio
中使用它时,它只会给出我在
结果(dataframe)中给出的相同列表
错误:stru_c的输入应该是原子向量
如果可能的话,发布数据帧的子集,这是可以使用的。当你问问题时,最好放置可复制的数据,这将帮助你更快地得到答案!如果你能在Beginglet us上看到代码的话,这篇文章解释了如何将这个列表存储为dataframe。
dd <- list(c("qlikview", "gpa", "access", "gpa", "access", "access",
"qlikview", "gpa", "access", "gpa"), c("report", "qlikview",
"gpa", "access", "qlikview", "gpa", "access", "qlikview", "gpa",
"access"), c("qlikview", "gpa", "access", "gpa", "access", "access",
"qlikview", "gpa", "access", "gpa"), c("qlikview", "gpa", "access",
"gpa", "access", "access", "qlikview", "gpa", "access", "gpa"
), c("report", "qlikview", "gpa", "access", "access", "gpa",
"access", "qlikview", "gpa", "access", "access", "gpa", "qlikview",
"gpa", "access", "qlikview", "gpa", "access"), c("report", "qlikview",
"access", "access", "report", "qlikview", "access", "access",
"gpa", "qlikview", "access", "access", "qlikview", "access",
"access"), c("report", "report", "access", "access", "report",
"report", "report", "report", "report", "report", "data", "data",
"report", "access", "report", "report"), c("report", "qlikview",
"gpa", "access", "gpa", "access"), c("report", "gpa", "access",
"access", "gpa", "gpa", "gpa", "gpa", "gpa", "access", "gpa",
"gpa", "gpa", "report"), c("report", "gpa", "gpa", "access",
"gpa", "access", "gpa", "access", "gpa", "gpa", "report", "gpa",
                           "gpa", "access", "gpa", "gpa", "gpa", "gpa", "gpa"))
df <- data.frame(text=rep(NA, length(dd)))
df$text <- lapply(lapply(dd, FUN = function(x) paste0(x, collapse=" ,")), FUN = noquote)
df
                                                                                                                                   text
1                                                                qlikview ,gpa ,access ,gpa ,access ,access ,qlikview ,gpa ,access ,gpa
2                                                           report ,qlikview ,gpa ,access ,qlikview ,gpa ,access ,qlikview ,gpa ,access
3                                                                qlikview ,gpa ,access ,gpa ,access ,access ,qlikview ,gpa ,access ,gpa
4                                                                qlikview ,gpa ,access ,gpa ,access ,access ,qlikview ,gpa ,access ,gpa
5  report ,qlikview ,gpa ,access ,access ,gpa ,access ,qlikview ,gpa ,access ,access ,gpa ,qlikview ,gpa ,access ,qlikview ,gpa ,access
6           report ,qlikview ,access ,access ,report ,qlikview ,access ,access ,gpa ,qlikview ,access ,access ,qlikview ,access ,access
7            report ,report ,access ,access ,report ,report ,report ,report ,report ,report ,data ,data ,report ,access ,report ,report
8                                                                                            report ,qlikview ,gpa ,access ,gpa ,access
9                                                   report ,gpa ,access ,access ,gpa ,gpa ,gpa ,gpa ,gpa ,access ,gpa ,gpa ,gpa ,report
10                      report ,gpa ,gpa ,access ,gpa ,access ,gpa ,access ,gpa ,gpa ,report ,gpa ,gpa ,access ,gpa ,gpa ,gpa ,gpa ,gpa