r - 如何在 Shiny 的应用程序中获取父 URL

Question

我在我的网站中嵌入了一个带有 iframe 的 Shiny 应用程序，现在我正在尝试保护我的 Shiny 应用程序:我希望 iframe 只能在我的网站中访问，而不是直接通过其 URL 访问。

  <iframe name="rshiny" 
    src="http://url-of-my-shiny-app/" style="border: none; width: 100%;height:800px;">
  </iframe>  

为此，我试图获取包含我的 Shiny 应用程序内 iframe 的父级 URL，并阻止它是否是好的网站。

问题是:我发现如何以多种语言获取 URL 父级，但 R。有谁知道我该怎么做？

我有另一种可能的解决方案，目前不起作用:

postForm('http://url.php', .params = params, curl = curl, style="POST")

我想我可以从我的网站向我的 R 应用程序发送一个 post 变量，就像一个 key ，只允许访问知道 key 的网站。
但我不能让它工作。

编辑:我认为这个问题与评论中建议的链接不同。事实上，建议的选项在 R Shiny 中似乎不可用。

Answer 1

我找到了解决方案!

在这里，您可以找到一种在 Shiny 的应用程序中获取“GET”变量的方法。
https://github.com/brianbolt/rShinyApps/tree/master/getParameters.shiny .
在我的 PHP 代码中，我计算了一个 md5 密码，该密码取决于日期，使其每天更改，并将其用作 iframe 中的 GET 参数:

<iframe name="rshiny" 
    src="youradress?bins=<?php echo $md5password;?">
  </iframe>  

从那时起，我可以直接在我的代码中使用它(请参阅我共享的代码中的 input$n_breaks)。
我在 server.R 中创建了一个 react 函数，它计算相同的 md5 密码。

最后，我们将其与参数中给出的密码进行比较。如果相同，我们就打开图，读取数据……否则，我们就停止这个过程。