Shiny App Issue "ERROR: An error has occurred. Check your logs or contact the app author for clarification."

the app works fine in my local machine but when deploying on the server some graphs gives the err.
here is log-

2020-09-17T14:06:31.729598+00:00 shinyapps[2662827]: If you use this lexicon, then please cite it.
2020-09-17T14:06:31.749431+00:00 shinyapps[2662827]: Warning: Error in menu: menu() cannot be used non-interactively
2020-09-17T14:06:31.755847+00:00 shinyapps[2662827]: 198: stop
2020-09-17T14:06:31.755849+00:00 shinyapps[2662827]: 197: menu
2020-09-17T14:06:31.755850+00:00 shinyapps[2662827]: 196: printer
2020-09-17T14:06:31.755851+00:00 shinyapps[2662827]: 195: load_dataset
2020-09-17T14:06:31.755851+00:00 shinyapps[2662827]: 194: textdata::lexicon_nrc
2020-09-17T14:06:31.755852+00:00 shinyapps[2662827]: 193: get_sentiments
2020-09-17T14:06:31.755852+00:00 shinyapps[2662827]: 186: function_list[[i]]
2020-09-17T14:06:31.755852+00:00 shinyapps[2662827]: 185: freduce
2020-09-17T14:06:31.755852+00:00 shinyapps[2662827]: 184: _fseq
2020-09-17T14:06:31.755853+00:00 shinyapps[2662827]: 183: eval
2020-09-17T14:06:31.755853+00:00 shinyapps[2662827]: 182: eval
2020-09-17T14:06:31.755853+00:00 shinyapps[2662827]: 180: %>%
2020-09-17T14:06:31.755854+00:00 shinyapps[2662827]: 179: renderPlot [/srv/connect/apps/Sentiment_text_analysis_app/app.R#289]
2020-09-17T14:06:31.755855+00:00 shinyapps[2662827]: 123: reactive:plotObj
2020-09-17T14:06:31.755855+00:00 shinyapps[2662827]: 177: func
2020-09-17T14:06:31.755869+00:00 shinyapps[2662827]: 107: drawReactive
2020-09-17T14:06:31.755870+00:00 shinyapps[2662827]: 94: origRenderFunc
2020-09-17T14:06:31.755870+00:00 shinyapps[2662827]: 93: output$myChart3
2020-09-17T14:06:31.755855+00:00 shinyapps[2662827]: 137: drawPlot
2020-09-17T14:06:31.755870+00:00 shinyapps[2662827]: 12: fn
2020-09-17T14:06:31.755870+00:00 shinyapps[2662827]: 13: runApp
2020-09-17T14:06:31.755871+00:00 shinyapps[2662827]: 7: connect$retry
2020-09-17T14:06:31.755871+00:00 shinyapps[2662827]: 6: eval
2020-09-17T14:06:31.755871+00:00 shinyapps[2662827]: 5: eval
2020-09-17T14:06:32.319554+00:00 shinyapps[2662827]: Joining, by = "word"
2020-09-17T14:06:32.882425+00:00 shinyapps[2662827]: summarise() regrouping output by 'word' (override with .groups argument)
2020-09-17T14:06:32.965176+00:00 shinyapps[2662827]: geom_smooth() using method = 'gam' and formula 'y ~ s(x, bs = "cs")'
2020-09-17T14:06:32.966579+00:00 shinyapps[2662827]: Warning: Removed 2177 rows containing non-finite values (stat_smooth).
2020-09-17T14:06:33.155437+00:00 shinyapps[2662827]: Warning: Removed 2177 rows containing missing values (geom_text).
2020-09-17T14:06:33.733920+00:00 shinyapps[2662827]: Joining, by = "word"
2020-09-17T14:06:36.825997+00:00 shinyapps[2662827]: Warning: Removed 18074 rows containing non-finite values (stat_count).
2020-09-17T14:06:37.360968+00:00 shinyapps[2662827]: Joining, by = "word"
2020-09-17T14:06:38.907824+00:00 shinyapps[2662827]: summarise() regrouping output by 'word', 'date' (override with .groups argument)
2020-09-17T14:06:39.397140+00:00 shinyapps[2662827]: Joining, by = "word"
2020-09-17T14:06:39.863421+00:00 shinyapps[2662827]: summarise() regrouping output by 'word', 'date' (override with .groups argument)
2020-09-17T14:09:27.932447+00:00 shinyapps[2662827]: Joining, by = "word"
2020-09-17T14:09:29.695730+00:00 shinyapps[2662827]: summarise() regrouping output by 'word', 'date' (override with .groups argument)
2020-09-17T14:09:29.956842+00:00 shinyapps[2662827]: geom_smooth() using method = 'loess' and formula 'y ~ x'
2020-09-17T14:09:29.957561+00:00 shinyapps[2662827]: Warning: Removed 112 rows containing non-finite values (stat_smooth).
2020-09-17T14:09:30.380214+00:00 shinyapps[2662827]: Joining, by = "word"
2020-09-17T14:09:31.884010+00:00 shinyapps[2662827]: summarise() regrouping output by 'word', 'date' (override with .groups argument)
2020-09-17T14:09:32.320154+00:00 shinyapps[2662827]: Joining, by = "word"
2020-09-17T14:09:32.789076+00:00 shinyapps[2662827]: summarise() regrouping output by 'word', 'date' (override with .groups argument)

error getting on the server

seems that lexicon_nrc is a function that when you run in a regular R session would prompt the user with an interactive menu to download a file or not. This is clearly incompatible with a shinyapp.
perhaps the manual_download option would bypass that.

How do I manual_download?

The documentation says you tell where to download with dir param.
So presumably you can do that