2016-03-08 17 views
4

我在gTrendsR搜索中收到兩個錯誤。我試圖將這個軟件包與來自https://github.com/PMassicotte/gtrendsR的CRAN下載和devel版本一起使用。gtrendsR查詢問題

library(gtrendsR) 
gconnect(usr, psw, verbose=TRUE) 
#Google login successful! 
sport_trend <- gtrends(c("nhl", "nba", "nfl")) 
#Error in names(trend) <- make.names(paste(kw, geo)) : 
# 'names' attribute [3] must be the same length as the vector [0] 

gtrends("Kim Kardashian") 
#Error: Not enough search volume. Please change your search terms. 

我已經嘗試了很多搜索條件無濟於事。有問題的功能似乎是.processResults

kw <- trimws(unlist(strsplit(queryparams[1], ","), use.names = FALSE)) 
    geo <- trimws(unlist(strsplit(queryparams[3], ","), use.names = FALSE)) 
    names(trend) <- make.names(paste(kw, geo)) 

這些表述似乎沒有依靠搜索結果,但在查詢本身。第二個錯誤源於:

if (length(vec) < 2) { 
    stop("Not enough search volume. Please change your search terms.", 
     call. = FALSE) 
    } 

變量vecgetForm我無法找到文件獲取其值。我試圖指定查詢項目,但也沒有工作。重新啓動R會話也沒有解決問題。

會話信息:

sessionInfo() 
# R version 3.2.3 (2015-12-10) 
# Platform: x86_64-w64-mingw32/x64 (64-bit) 
# Running under: Windows 7 x64 (build 7601) Service Pack 1 
# 
# locale: 
# [1] LC_COLLATE=English_United States.1252 LC_CTYPE=English_United States.1252 
# [3] LC_MONETARY=English_United States.1252 LC_NUMERIC=C       
# [5] LC_TIME=English_United States.1252  
# 
# attached base packages: 
# [1] stats  graphics grDevices utils  datasets methods base  
# 
# other attached packages: 
# [1] gtrendsR_1.3.3 
# 
# loaded via a namespace (and not attached): 
# [1] zoo_1.7-12  colorspace_1.2-6 scales_0.4.0  googleVis_0.5.10 plyr_1.8.3  
# [6] tools_3.2.3  gtable_0.2.0  RCurl_1.95-4.8 Rcpp_0.12.3  ggplot2_2.1.0 
# [11] RJSONIO_1.3-0 grid_3.2.3  munsell_0.4.3 bitops_1.0-6  lattice_0.20-33 
+0

有趣。我無法使用R版本3.2.2(2015-08-14),平臺:x86_64-w64-mingw32/x64(64位),運行於:Windows 7 x64(內部版本7601)Service Pack 1,gtrendsR_1下重現錯誤。 3.1(...) – lukeA

回答

1

我有同樣的問題。出於某種原因,改變我的代碼如下所示。希望你能弄清楚爲什麼。我是小白。

> styles <- gtrends(query=c("Pixie Pant", "Yoga Pants", "Jeans")) 
# Error in names(trend) <- make.names(paste(kw, geo)) : 
# 'names' attribute [3] must be the same length as the vector [2] 
> commodities2 <- gtrends(c("Oil prices", "mortgage rates"), res="7d", geo= "US") 
> styles <- gtrends(c("Pixie Pant", "Yoga Pants", "Jeans")) 
# Error in names(trend) <- make.names(paste(kw, geo)) : 
# 'names' attribute [3] must be the same length as the vector [2] 
> styles <- gtrends(c("Pixie Pant", "Yoga Pants", "Jeans"), res="7d", geo= "US") 
> plot(styles) 
3

由於Google API更改,程序包作者不得不進行完全重寫。獲取未發佈的gtrendsR 2.0.0代碼:

devtools::install_github('PMassicotte/gtrendsR') 

library(gtrendsR) 
# do not need to log in anymore 
# syntax change! 
gt.us <- gtrends("USA", geo="US", time = "2004-01-01 2004-01-30")