Question

我正在尝试在一个闪亮的应用程序中调整plotlyOutput，但更改高度参数似乎不会影响绘图大小，在今天更新到R 3.4并更新闪亮和情节（plotly_4.7.0，ggplot2_2.2.1.9000， shiny_1.0.3）我意识到在调整窗口大小时，绘图的大小不会动态改变。我试图直接使用plotlyoutput中的height修改绘图的大小，以及从plotly对象修改$ layout $ height属性，但它似乎对绘图的大小没有任何影响。这是一个示例代码。

ui<-fluidPage(
mainPanel(
tabsetPanel(
  tabPanel("tab",
           selectInput("plot","Plot type",c("Box plot"="box","Inidividual cells"="cell","Violin plot"="violin"),"violin"),
           plotlyOutput('Barplot',height = "100px")
           )
    )
  )
)

server<- function(input,output,session){
output$Barplot <- renderPlotly({
bp <- ggplot(mtcars,aes(x=cyl,y=mpg,colour=cyl))+geom_point() 
bp<-plotly_build(bp)
bp$layout$width= 100
bp
})
}
shinyApp(server=server,ui=ui)

Answer 1

尝试

plotlyOutput('Barplot')

和

bp <- ggplot(mtcars,aes(x=cyl,y=mpg,colour=cyl))+geom_point() 
ggplotly(bp, height=800) %>% layout(autosize=FALSE)

调整plotlyOutput对象的大小

1 个答案: