2017-07-19 146 views
0

这是我的例子:ggiraph情节移入闪亮的应用

library(shiny) 
library(ggplot2) 
library(ggiraph) 

df <- data.frame(achseX = c("A", "b"), achseY = c(12, 22)) 

server <- function(input, output) { 
    output$plot <- renderggiraph({ 
    gg <- ggplot(data = df) + geom_bar_interactive(aes(tooltip = achseY, x = achseX, y = achseY), stat = "identity") + 
     theme_minimal() 
    return(ggiraph(code = print(gg), selection_type = "multiple", zoom_max = 4, 
        hover_css = "fill:#FF3333;stroke:black;cursor:pointer;", 
        selected_css = "fill:#FF3333;stroke:black;")) 
    }) 
} 

ui <- fluidPage(
    "The plot should start right under this text.", 
    ggiraphOutput("plot") , 
    "This is where the plot should end." 
) 

shinyApp(ui = ui, server = server) 

当我启动应用程序,结果是这样的:

enter image description here

我添加的文本行显示,其中情节应该定位。如你所见,情节转移到另一个位置。同样的事情发生时,我开始闪亮的例子:

# example 1: 
shiny::runApp(appDir = system.file("shiny/crimes", package = "ggiraph"), display.mode = "showcase") 
# example 2: 
shiny::runApp(appDir = system.file("shiny/cars", package = "ggiraph"), display.mode = "showcase") 

难道我错过了什么?我怎么能把这个情节放到正确的位置?

编辑:

会议信息:

R version 3.4.0 (2017-04-21) 
Platform: x86_64-w64-mingw32/x64 (64-bit) 
Running under: Windows Server 2008 R2 x64 (build 7601) Service Pack 1 

Matrix products: default 

locale: 
[1] LC_COLLATE=German_Germany.1252 LC_CTYPE=German_Germany.1252 LC_MONETARY=German_Germany.1252 
[4] LC_NUMERIC=C     LC_TIME=German_Germany.1252  

attached base packages: 
[1] stats  graphics grDevices utils  datasets methods base  

other attached packages: 
[1] gdtools_0.1.4 ggiraph_0.4.0 ggplot2_2.2.1 shiny_1.0.3 

loaded via a namespace (and not attached): 
[1] zip_1.0.0   Rcpp_0.12.11  compiler_3.4.0 plyr_1.8.4  R.methodsS3_1.7.1 R.utils_2.5.0  
[7] base64enc_0.1-3 tools_3.4.0  digest_0.6.12  uuid_0.1-2  jsonlite_1.5  tibble_1.3.3  
[13] gtable_0.2.0  rlang_0.1.1  DBI_0.7   yaml_2.1.14  officer_0.1.4  dplyr_0.5.0  
[19] xml2_1.1.1  htmlwidgets_0.8 grid_3.4.0  R6_2.2.2   rvg_0.1.4   purrr_0.2.2.2  
[25] magrittr_1.5  scales_0.4.1  htmltools_0.3.6 assertthat_0.2.0 mime_0.5   xtable_1.8-2  
[31] colorspace_1.3-2 httpuv_1.3.5  labeling_0.3  lazyeval_0.2.0 munsell_0.4.3  R.oo_1.21.0 
+0

您可以添加'sessionInfo()'结果,并告诉我您使用的浏览器是什么(我无法在我的Mac上重现您的问题) –

+0

什么是代码中的'ggiraph'?编辑:我虽然是一个错字。现在我看到有一个包名:) –

+0

@DavidGohel感谢您的快速响应。看起来这是RStudio Viewer的可视化问题。我在Internet Explorer中遇到了同样的问题。当我在Chrome中打开它时,它工作正常。所以猜猜这​​个话题已经解决了。 –

回答

0

这是RStudio和Internet Explorer的一个可视化的错误。它在Google Chrome中运行良好。尽管如此,Mozilla Firefox仍然无法测试它。

+0

有'plotly'完全相同的问题 - >它没有正确显示在IE中,但在我的情况下,在Mozilla Firefox它的作品完美。 –