在闪亮的应用程序中将ggplot对象转换为plotly

Question

我试图将ggplot对象转换为plotly并在闪亮的应用程序中显示它.但我遇到一个错误"没有适用于'plotly_build'的方法应用于类"NULL"的对象

我能够成功地将ggplot对象返回到闪亮的应用程序,

output$plot1 <- renderplot({
   gp <- ggplot(data = mtcars, aes(x = disp, y = cyl)) + geom_smooth(method = lm, formula = y~x) + geom_point() + theme_gdocs()
})

但莫名其妙地无法转换它.

我的代码看起来像这样

output$plot2 <- renderplotly({
   gp <- ggplot(data = mtcars, aes(x = disp, y = cyl)) + geom_smooth(method = lm, formula = y~x) + geom_point() + theme_gdocs()
   ggplotly()
})

Answer 1

尝试:

library(shiny)
library(ggplot2)
library(ggthemes)
library(plotly)

ui <- fluidPage(  
titlePanel("Plotly"),
sidebarLayout(
sidebarPanel(),
mainPanel(
  plotlyOutput("plot2"))))

server <- function(input, output) {

output$plot2 <- renderPlotly({
print(
  ggplotly(
    ggplot(data = mtcars, aes(x = disp, y = cyl)) + geom_smooth(method = 
                      lm, formula = y~x) + geom_point() + theme_gdocs()))

})
}

shinyApp(ui, server)

Answer 2

如果它在RStudio窗格而不是应用程序中呈现,请确保您plotlyOutput在UI部分以及renderPlotly服务器部分中使用.