R Блестящий iframe больше не отображает источник .pdf после обновления?

Question

Я недавно обновил свои пакеты, и мое блестящее приложение имеет сломанный iframe, который использовался для отображения pdf-файла из Интернета.

ui.R

library(shiny) 

shinyUI(bootstrapPage(

     headerPanel("PDF VIEWER"), 

     mainPanel(
     tags$iframe(style="height:600px; width:100%", src="http://radhome.gsfc.nasa.gov/radhome/papers/GOMAC05_LaBel.pdf")) 
    ) 
) 

Я проверил это на нескольких машинах и тот факт, что он работал ранее принуждают меня полагать, что IFrame тег ведет себя странно?

Любая помощь приветствуется.

блестящий 0.10.1

Answer 1

Ваш сайт со ссылкой посылает «X-каркасные опций sameorigin» в заголовке, который в основном говорит любой браузер, чтобы не допустить его содержание, которое будет отображаться в окне IFRAME:

library("RCurl") 
h = basicHeaderGatherer() 
appURL <- "http://radhome.gsfc.nasa.gov/radhome/papers/GOMAC05_LaBel.pdf" 
out <- getURL(appURL, headerfunction = h$update) 
appHeader <- h$value() 
> appHeader[["X-Frame-Options"]] 
[1] "SAMEORIGIN"