r - R语法中的自动更新日期

Question

首先，这是我在这里的第一个问题，对不起，如果我没有尽可能清楚地问这个问题。

我正在尝试使用以下语法自动更新日期：

Xyz_tweets <- search_tweets("Xyz, since:2020-6-20 until:2020-6-21" ,n = 15000, lang = "en" )

我创建了两个对象：

sincetdate <- Sys.Date() - 1
untildate <- Sys.Date()

然后尝试保存在一个字符串中：

searchquery <- paste( "Xyz_tweets <- search_tweets(Xyz, since:",sincedate,  "until:", untildate, "n = 15000, lang = "en" )")

然后使用

eval(parse(text=searchquery))

将字符串评估为表达式。
但它不工作。我收到一条错误消息：

错误：“searchquery <- paste("SCUBA_tweets <- search_tweets(SCUBA, since:",sincedate, "until:", untildate, "n = 15000, lang = "en" 中出现意外符号

当我只使用以下日期时工作正常：

searchquery3 = 'SCUBA_tweets <- search_tweets("SCUBA, since:2020-6-20 until:2020-6-21" ,n = 15000, lang = "en" )'

接着

eval(parse(searchquery3))

如何得到

searchquery <- paste( "Xyz_tweets <- search_tweets(Xyz, since:",sincedate,  "until:", untildate, "n = 15000, lang = "en" )")
eval(parse(text=searchquery))

去工作？

标签： rdate

Answer 1

这个怎么样：

searchquery <- paste0("Xyz, since:", sincedate, " until:", untildate)
Xyz_tweets <- search_tweets(searchquery, n = 15000, lang = "en")

您可以只构建搜索查询，然后在内部使用它search_tweets()。它比使用更清洁、更安全eval()。