rstudio-server - grobToDev.default(gTree, dev) のエラー

Question

Shiny+gridSVG でアプリを構築しようとしています。この問題は常に発生しており、私にはわかりません。

私のサーバー.R:

library(grid)
library(lattice)
library(gridSVG)

shinyServer(function(input, output) {

  data = reactive({
    inFile = input$file1
    if (is.null(inFile))
      return(NULL)
    read.csv(inFile$datapath, header=input$header, 
             sep=input$sep, quote=input$quote)
  })

  featurelist = reactive({
    return (colnames(data()))
  })

  output$classUI = renderUI({
    selectInput("classlabel","Classify by:", featurelist())
  })


  output$svg.grid = reactive({
    dat = data()
    features = featurelist()

    #group = dat[,c(which(features == input$classlabel))]
    subsetted.features = features[-c(which(features == input$classlabel))]

    #classlabel.level = levels(group)

    xyplot.out = xyplot(subsetted.features[1] ~ subsetted.features[2]|input$classlabel,
                        data = dat
                        )

    tempsvg <- tempfile(fileext=".svg")
    on.exit(unlink(tempsvg))
    gridToSVG(name=tempsvg)
    svgoutput <- readLines(tempsvg, n=-1)
    svgoutput
  })

})

これは私のjsです：

<script>
var networkOutputBinding = new Shiny.OutputBinding();
$.extend(networkOutputBinding, {
    find: function(scope) {
      return $(scope).find('.shiny-network-output');
    },
    renderValue: function(el, data) {
          $(el).html(data.join(''));      
    }
  });
  Shiny.outputBindings.register(networkOutputBinding, 'timelyportfolio.networkbinding');

</script>

コンソールのエラーメッセージは次のとおりです。

Error in grobToDev.default(gTree, dev) : We shouldn't be here!

誰も理由を知っていますか？