【发布时间】：2018-09-25 07:35:54
【问题描述】：
我正在尝试显示一个带有闪亮网站的 iframe，但它总是显示空白页面。
下面是取自different question的代码
代码：
rm(list = ls())
library(shiny)
members <- data.frame(name=c("Name 1", "Name 2"), nr=c('BCRA1','FITM2'))
ui <- fluidPage(titlePanel("Getting Iframe"),
mainPanel(fluidRow(
htmlOutput("my_test")
)
)
)
server <- function(input, output) {
output$my_test <- renderUI({
tags$iframe(src='https://www.google.co.in/', height=600, width=535)
})
}
shinyApp(ui, server)
输出： 为什么我无法显示任何网站。请帮帮我，我用谷歌搜索了很多，尝试了很多选项，包括 renderUI； htmloutput 和 uioutput 面板。
【问题讨论】：
-
我可以确认您的示例或链接问题中的示例均显示空白 iframe。在这两种情况下，javascript 控制台都会给我错误
Refused to display 'https://www.google.co.in/' in a frame because it set 'X-Frame-Options' to 'sameorigin'.。更多参考请见here。 -
谢谢@GregordeCillia - 我检查了一个本地网络服务器，它工作正常。谷歌一般来说是一个常见的网站，所以之前没有检查其他网站。请将其作为答案提交 - 我会将其标记为完成；但 R 控制台没有将其作为错误抛出。我怎么知道这种情况？
-
我刚刚发布了一个答案，并包含了一个用于访问 JavaScript 控制台的键盘快捷键。 Shiny 不会将 JavaScript 中的很多错误消息返回给 R，因此我建议不时检查此控制台以保持您的应用程序稳定。