Блестящее приложение не отображает график с моей пользовательской функцией - PullRequest
Новая
       11

Блестящее приложение не отображает график с моей пользовательской функцией

0 голосов
/ 05 октября 2018

Я делаю свою первую блестящую гистограмму с помощью ползунка.Тем не менее, я хочу использовать пользовательскую функцию для создания вывода для этой гистограммы.Вот фрагмент кода, относящийся к гистограмме: 

#Define server logic required to draw a histogram
server <- function(input, output) {
  output$distPlot <- renderPlot({

 #Use the function for a constant risk, but sample uniformly over CI for OR
 #95% CI: 1.19-1.41

  myrisk<-input$risk
  random<-runif(1000, min = 1.19, max = 1.41)

  output<-sapply(random, myfunction, risk=myrisk)

 hist(output, xlab="Number of Cases Prevented", 
      main="Histogram of 1000 Simulations")
  })
}

Примечание: «Моя функция» была определена ранее в коде, прежде чем я вызову блестящую библиотеку.Кто-нибудь видит какие-либо указания, почему это не будет работать?

Я попытался отладить его, и проблема заключается в строке 'output'.

Спасибо!

...