2017-04-26 22 views
0

我想製作交互式雷達圖。 ggRadar(注意ggRadar中的大寫R;有一個名爲ggradar的不同軟件包)使用ggiraph中的交互式工具來執行此操作。R ggRadar交互式打開或關閉的行爲差異

如果你運行下面的代碼,你會得到一個很好看的雷達圖表。如果更改爲交互式= TRUE,那麼你得到的錯誤信息

錯誤在P +主題(plot.title = element_text(hjust = 0.5,大小= 11, 家庭= 「泰晤士報」,:無數值參數二元運算

require(ggiraphExtra) 
      spiderData <- data.frame(year = c("X2010", "X2020"), nut1 = c(2.87, 6.66), 
    nut2 = c(445, 486), nut3 = c(176, 251), stringsAsFactors = FALSE) 
          p <- ggRadar(data = spiderData[,1:ncol(spiderData)], 
mapping = aes(colour = year), 
    rescale = FALSE, interactive = FALSE, use.label = TRUE, legend.position = "right") 
      p <- p + theme(plot.title = element_text(hjust = 0.5, size = 11, family = "Times", 
       face = "plain")) + ggtitle("Title text") 
      p 

如果你只運行

ggRadar(data = spiderData[,1:ncol(spiderData)], mapping = aes(colour = year), 
      rescale = FALSE, interactive = TRUE, use.label = TRUE, legend.position = "right") 

你得到一個不錯的互動圖表。我想獲得一個交互式圖形在那裏我可以還要添加標題等元素(以及其他可能的內容)。

回答

1

謝謝你對我的包ggiraphExtra感興趣。
您可以使用ggiraph軟件包中的ggiraph()函數獲取交互式繪圖。

要求(ggiraph) ggiraph(代碼=打印(P))

+0

訣竅這是設置交互式爲FALSE在該曲線圖的原始結構,曲線圖存儲在變量中(第在這種情況下),然後使用'ggiraph(code = print(p))' – JerryN