闪亮的 htmlwidget 呈现空白
shiny htmlwidget renders blank
我有以下闪亮的应用程序。
server.R
library(radarchart)
shinyServer(function(input, output) {
output$radar <- renderChartJSRadar({
scores <- data.frame("Label"=c("Communicator", "Data Wangler", "Programmer",
"Technologist", "Modeller", "Visualizer"),
"Rich" = c(9, 7, 4, 5, 3, 7),
"Andy" = c(7, 6, 6, 2, 6, 9),
"Aimee" = c(6, 5, 8, 4, 7, 6))
chartJSRadar(scores, maxScale = 10, showToolTipLabel=TRUE)
})
})
ui.R
shinyUI(fluidPage(
titlePanel("RADARRRRR "),
sidebarLayout(
sidebarPanel(
numericInput("obs", "Observations:", 10), width = 4
),
mainPanel(
chartJSRadarOutput("radar")
)
)
))
此应用运行无误。没有 R 控制台消息,没有 chrome 控制台消息和空白 canvas 用于绘图。
我知道绘图库有效,因为我可以强制它显示到 Rstudio 中。
我还检查了 chart.js 是否在库中,它似乎没问题。
非常感谢任何帮助修复或开始调试而没有错误消息的想法。
检查页面中的 canvas。我怀疑它真的很大,您需要向下滚动一点才能看到它。
我有以下闪亮的应用程序。
server.R
library(radarchart)
shinyServer(function(input, output) {
output$radar <- renderChartJSRadar({
scores <- data.frame("Label"=c("Communicator", "Data Wangler", "Programmer",
"Technologist", "Modeller", "Visualizer"),
"Rich" = c(9, 7, 4, 5, 3, 7),
"Andy" = c(7, 6, 6, 2, 6, 9),
"Aimee" = c(6, 5, 8, 4, 7, 6))
chartJSRadar(scores, maxScale = 10, showToolTipLabel=TRUE)
})
})
ui.R
shinyUI(fluidPage(
titlePanel("RADARRRRR "),
sidebarLayout(
sidebarPanel(
numericInput("obs", "Observations:", 10), width = 4
),
mainPanel(
chartJSRadarOutput("radar")
)
)
))
此应用运行无误。没有 R 控制台消息,没有 chrome 控制台消息和空白 canvas 用于绘图。 我知道绘图库有效,因为我可以强制它显示到 Rstudio 中。 我还检查了 chart.js 是否在库中,它似乎没问题。
非常感谢任何帮助修复或开始调试而没有错误消息的想法。
检查页面中的 canvas。我怀疑它真的很大,您需要向下滚动一点才能看到它。