闪亮搭配rNVD3在rstutio中运行良好，但在chrome中仅显示图表的一半

我在shiny中使用rNVD3制作图表，它在rstudio中运行良好，但它会给出错误消息：

错误：[在请求读取时]对等方重置连接

我不知道这是怎么回事

但当我在Chrome或Firefox中打开这个应用程序时，图表只显示上半部分（对不起，我没有足够的声誉来发布图片）

代码是：

#ui.r
require(rNVD3)
library(shiny)
shinyUI(pageWithSidebar(
    headerPanel("rNVD3: Interactive Charts from R using NVD3.js"),

    sidebarPanel(
       selectInput(inputId = "gender",
            label = "Choose Gender",
            choices = c("Male", "Female"),
            selected = "Male"),
       selectInput(inputId = "type",
            label = "Choose Chart Type",
            choices = c("multiBarChart", "multiBarHorizontalChart"),
            selected = "multiBarChart"),
       checkboxInput(inputId = "stack",
              label = strong("Stack Bars?"),
              value = FALSE)
  ),
 mainPanel(
    showOutput("myChart")
   )
  ))

#server.r
require(rNVD3)
shinyServer(function(input, output) {
      output$myChart <- renderChart({
        hair_eye = as.data.frame(HairEyeColor)
        p6 <- nvd3Plot(Freq ~ Hair | Eye, data = subset(hair_eye, Sex == input$gender), 
               type = input$type, id = 'myChart')
    p6$chart(color = c('brown', 'blue', '#594c26', 'green'), stacked = input$stack)
    return(p6)
  })
})

#ui.r
需要（rNVD3）
图书馆（闪亮）
shinyUI（带侧栏的页面）(
headerPanel（“rNVD3:R中使用NVD3.js的交互式图表”），
侧栏面板(
选择输入（inputId=“性别”，
label=“选择性别”，
选择=c（“男性”、“女性”），
选定的=“男性”），
选择输入（inputId=“type”，
label=“选择图表类型”，
选项=c（“多条形图”、“多条形水平图”），
已选择=“多条形图”），
checkboxInput（inputId=“stack”，
label=strong（“堆叠条？”），
值=FALSE）
),
主面板(
显示输出（“我的图表”）
)
))
#服务器.r
需要（rNVD3）
shinyServer（功能（输入、输出）{
输出$myChart