Я по-прежнему новичок в r и блестящий, и я озадачен тем, что должно быть простой логикой. Я пытаюсь отобразить pdf файлы в виджетах imageOutput, но не повезло. Может ли кто-нибудь направить меня в правильном направлении?
sample ui.R
shinyUI(pageWithSidebar(
mainPanel(
selectInput("sel_ed",
label = "View outputs for Ecodistrict:",
choices = c(244,245,247,249),
selected = NULL,
multiple = FALSE),
imageOutput("imp_pdf",width="500px",height="500px")
))
sample server.R
shinyServer(function(input, output, session) {
importance <- function(inputSpecies){
img_dir <- pdf(paste(inputSpecies,"\\models\\MATL\\MATRF_Importance",sep=""))
}
output$imp_pdf <- renderImage({importance(input$sel_ed)})
})
Большинство ошибок, которые я получаю, связаны с ожидаемыми символьными векторными аргументами или атомными векторами. Я знаю, что блестящий более или менее предназначен для рендеринга и отображения изображений или графиков, но должен быть способ отображения pdf, которые уже находятся на локальном диске.