如何使用RedditExtractoR::find_thread_urls()迭代关键字和子reddit的所有组合[duplicate]

nx7onnlm  于 2022-12-25  发布在  其他
关注(0)|答案(1)|浏览(71)
    • 此问题在此处已有答案**:

Is there some 'cross apply' function in R?(3个答案)
2天前关闭。
首先,很抱歉这个令人困惑的标题,我不知道从哪里开始!
我正在考虑从RedditExtractoRfind_thread_urls()函数传递一个字符串。我想在下面的示例代码中保存6个可能的迭代中的每一个(这不起作用)。
有没有一个简洁的方法来做这件事?

library(RedditExtractoR)

keywords <- c('cats', 'dogs', 'catnip')
subreddit <- c('cats', 'animals')
post_urls <- find_thread_urls(keywords = keywords,
                              subreddit = subreddit)
sbdsn5lh

sbdsn5lh1#

不熟悉RedditExtractoR,但此类任务的通用解决方案是使用嵌套的lapply()调用:

library(RedditExtractoR)

post_urls <- lapply(
  setNames(keywords, keywords),
  \(kw) lapply(
    setNames(subreddit, subreddit),
    \(sr) paste(kw, sr)
  )
)

(The setNames()调用使输出列表基于输入命名。)

相关问题