невозможно разместить логотип / изображение в приложении Shiny - PullRequest
Новая
       7

невозможно разместить логотип / изображение в приложении Shiny

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

Я стараюсь изо всех сил разместить логотип в своем блестящем приложении, но на нем каждый раз отображается синий знак вопроса . Я сделал отдельный файл ui и server , но все равно не работал. Я также сделал папку 'www' и настроил ее как работающую непосредственно с изображением внутри нее, но безрезультатно. Может ли кто-нибудь, пожалуйста, вести меня? 

library(dplyr)

library(shiny)

library(shinythemes)

#UI
ui = fluidPage(img(src = "picture.jpg"), fluidRow( rpivotTableOutput("pivot")))


#Server
server = function(input, output, session) {reactive({
    mtcars %>% select(cyl, carb, vs, mpg) %>% group_by(carb,vs ) %>% summarise(mpg=sum(mpg))}) 

  output$pivot <- renderRpivotTable(  rpivotTable::rpivotTable(mtcars, rows = c( "vs"),cols=c("carb"), vals =  "mpg", aggregatorName = "Sum",                                rendererName =  "Table",                                                  width="50%", height="550px"))}

shinyApp(ui = ui, server = server)
...