R中带有List的双引号[重复]

Question

我正在尝试将引号添加到从 predict in 输出的列表中 recommenderlab 图书馆。看起来如下所示。我面对 将其转换为类似

的串联字符串的挑战

List: 
"Key" 
"value1" "value2" "value3" 
"value4" .............. 

预期：

"value1", "value2", "value3", "value4" .......... 

尝试了不同的方法

使用：

stri_join_list(v_list, sep = ";", collapse = NULL) 

已编辑以获取更多信息

library("recommenderlab")

data("MovieLense")

MovieLense100 <- MovieLense[rowCounts(MovieLense) >100,]

MovieLense100

train <- MovieLense100[1:50]

rec <- Recommender(train, method = "UBCF")

rec

pre <- predict(rec, MovieLense100[101:102], n = 10)

as(pre, "list")

当您在此处看到列表时，它将采用上述格式：

$`291`
 [1] "Titanic (1997)"                         "Contact (1997)"                         "Alien (1979)"                          
 [4] "Amadeus (1984)"                         "Godfather, The (1972)"                  "Aliens (1986)"                         
 [7] "Sting, The (1973)"                      "American Werewolf in London, An (1981)" "Schindler's List (1993)"               
[10] "Glory (1989)"                          

我希望它是这样的：

"Titanic (1997)", "Contact (1997)", "Alien (1979)"  ....

全部连接成一个字符串，就像上面一样

谢谢，但是

paste0(shQuote(list1),collapse=",")

上面也不是我想要的，因为这给了我“\”，请告诉我可以做什么

cat(paste0(shQuote(v_list[["bi_Marika77"]]),collapse=";"))

-- 这行得通。谢谢大家

不过，我有一个小挑战 想要将上述结果保留在数据框中，其中第一列将是用户 ID，第二列将是连接列表。请帮忙！

Answer 1

我想你在找shQuote()

list1 = as(pre, "list")
paste0(shQuote(list1$`291`),collapse=",")