get_widget（）中的gtrends（）错误

Question

我已经运行了这段代码：

 install.packages("gtrendsR")
 library(gtrendsR)
 library(reshape2)

 google <- gtrends( keyword = "world cup")

，并收到以下错误消息：

 Error in get_widget(comparison_item, category, gprop, hl) : 
 widget$status_code == 200 is not TRUE

知道什么是问题吗？我不知道错误消息在说什么。