我创建了一个函数,以便通过R发布一些推文。此函数需要两个参数:路径和CSV文件的名称。
此CSV文件包含两列;第一个带有图像的标识符(也将被发布),第二个带有图像的完整路径。看起来像是:
id; path
image1; /Users/stackoverflow/pic1.jpg
image2; /Users/stackoverflow/pic2.jpg
因此,我按如下进行操作。首先阅读CSV:
dt <- readr::read_csv2(file.path(path_to_csv, csv_file_name))
然后我将小标题转换为列表:
purrr::pmap(df, list)
最后,我经过一个循环以发送推文:
for (i in 1:length(dt)) {
# Load images
img <- dt[[i]]$path
# Load text
text <- dt[[i]]$id
# Release tweet
twitteR::tweet(text = text, mediaPath = img)
}
此代码可以正常工作,但是我的问题是:我可以这样做但避免循环部分吗?