Shiny Apps - Disconnected when executing code that opens a popup window.

shiny
rstudio
shinyappsio

#1

I created my first Shiny app and everything works great locally! In my app, i take advantage of custom package on GitHub Called RFishBC. Using this package, you can digitize points on images of fish scales and get some information about the length and age of the fish in a table. You do the digitizing in a popup window that the RFishBC creates through its digitizeRadii function. See below screenshot.

When i hit the aging button when i host the app on Shinyapps.io, the page disconnects and cant get the popup window to display.

Here are the logs which say something about an object 'y' not found, but i have no object called y in my code.

2018-10-16T21:26:48.602136+00:00 shinyapps[517790]:   91: <Anonymous>
2018-10-16T21:26:48.602138+00:00 shinyapps[517790]:   84: observeEventHandler [/srv/connect/apps/r_script/app.R#161]
2018-10-16T21:26:48.602139+00:00 shinyapps[517790]:   13: runApp
2018-10-16T21:26:48.602140+00:00 shinyapps[517790]:   12: fn
2018-10-16T21:26:48.602137+00:00 shinyapps[517790]:   86: iDigitizeRadii1
2018-10-16T21:26:48.602141+00:00 shinyapps[517790]:    7: connect$retry
2018-10-16T21:26:48.596386+00:00 shinyapps[517790]: Warning: Error in eval: object 'y' not found
2018-10-16T21:26:48.602133+00:00 shinyapps[517790]:   93: eval
2018-10-16T21:26:48.602142+00:00 shinyapps[517790]:    6: eval
2018-10-16T21:26:48.602142+00:00 shinyapps[517790]:    5: eval

Does anyone have any idea of a fix? My code for the digitizing as well formatting the results into a table is below.

  observeEvent(input$ageTableButton,{
    
    rds<-digitizeRadii("scale.jpg",input$oidNum,reading=input$oidNum,edgeIsAnnulus=FALSE,col.sel='red',col.info='red')
    
    rdsFilesWide <<- combineData(rds,outFormat="wide")
    
    ageTableData$data <- rdsFilesWide
    
  })


#2

Might be this line of the RFishBC package you are using?