График Plotly не отображается при использовании блестящего - PullRequest
Новая
       15

График Plotly не отображается при использовании блестящего

0 голосов
/ 13 июня 2019

Я пытаюсь построить плотно тепловую карту с помощью ползунка.Слайдер отображается, но графическая карта нагрева - нет.Когда не используется с блестящими, карта тепловых карт просто отлично.В какой-то момент я получил код для работы, но с тех пор я сломал его, и я не знаю, как.

library(gplots)
library(plotly)
library(shiny)


#Ui
ui <- fluidPage(
titlePanel("Example"),
sidebarLayout(
sidebarPanel(
sliderInput(inputId = "P4Volume",
              label = "Example:",
              min = 50000,
              max = 1200000,
              value = 30)
),
mainPanel(
    plotlyOutput(outputId = "heatmap"),
)
)
)

#Server
server <- function(input, output) {
output$heatmap <- renderPlotly({

*Code here that takes input$P4Volume and creates a matrix z

plot_ly(z,x,y,type= "heatmap",width=800,height=600)
})
}
shinyApp(ui, server)

Я даже попробовал очень простой пример без ползунка и только сюжетного графика: 

library(shiny)
library(plotly)

x=seq(0,10,2)
y=seq(0,10,2)
z=matrix(100,nrow=6,ncol=6)
p=plot_ly(z=z, x = x, y =y,type="heatmap")

ui <- fluidPage(
plotlyOutput("plot")
)

server <- function(input, output) {
output$plot <- renderPlotly({p})
}
shinyApp(ui, server)

И я до сих пор не получаю плотно тепловую карту, но когда я строю графикэто за пределами Шинни это хорошо строит ...

1 Ответ

0 голосов
/ 14 июня 2019

Оказывается, он работает в Chrome, но не работает в IE.Изменил мой браузер в R на хром, и теперь все выглядит хорошо!

...