R Shiny iframe 更新后不再显示 .pdf 源代码？

Question

我最近更新了我的软件包，但我 Shiny 的应用程序有一个损坏的 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 标记的行为很奇怪？

感谢任何帮助。

Shiny 0.10.1

Answer 1

您引用的网站在 header 中发送“x-frame-options 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"