R Блестящий: Как поместить локальные изображения в блестящие таблицы

Question

Я не могу выглядеть блестящим, чтобы отобразить изображение в таблице, если изображение хранится на моем компьютере. Я могу заставить его работать, если изображение указано по URL, но я не знаю ни одного простого способа "обслужить" изображение так, чтобы его можно было найти по URL, в отличие от простого использования имени файла изображения и помещения файла в том же каталоге, что и ui.R и server.R (я также попытался поместить изображение в домашний каталог R). Я проверил HTML, который выводится, и он выглядит так же, как в HTML документах, которые успешно отображают изображения, хранящиеся на локальном компьютере. Фактически, если я копирую и сохраняю выходной HTML-код из блестящего как статическая страница с изображением в том же каталоге, а затем открываю его в моем браузере, изображение действительно отображается.

Используемые мной сценарии server.R и ui.R приведены ниже.

Кто-нибудь знает хороший обходной путь или другое решение?

Спасибо за помощь.

Сценарий server.R:

#server.R
require(shiny)
shinyServer(function(input, output){
    output$mytable <- renderTable({
        dat <- data.frame(
            country = c('USA', 'China','Working directory'),
            flag = c('<img src="test.png" height="52"></img>',
                             '<img src="http://upload.wikimedia.org/wikipedia/commons/thumb/f/fa/Flag_of_the_People%27s_Republic_of_China.svg/200px-Flag_of_the_People%27s_Republic_of_China.svg.png" height="52"></img>',
                             getwd())
        )
        dat
    }, sanitize.text.function = function(x) x)
})

Скрипт ui.R:

require(shiny)

shinyUI(
    tableOutput('mytable')
)

Answer 1

URL-адрес элемента на вашем компьютере - всего лишь что-то вроде этого, которое я мог бы использовать, чтобы вызвать "Введение в R" на моем компьютере:

 http://127.0.0.1:19812/doc/manual/R-intro.html

Так что вам нужно определить правильный каталог / путь для размещения между 127.0.0.1:19812 и имя файла (а также проверьте номера портов.)