在闪亮的应用中嵌入Google分析跟踪代码

Question

我一直在使用Google分析来跟踪闪亮的网络应用上的活动,使用以下内容ui.R:

shinyUI(fluidPage(
    tags$head(HTML(
        "<script>
        (function(i,s,o,g,r,a,m){
        i['GoogleAnalyticsObject']=r;i[r]=i[r]||
        function(){
        (i[r].q=i[r].q||[]).push(arguments)},i[r].l=1*new Date();
        a=s.createElement(o), m=s.getElementsByTagName(o)[0];
        a.async=1;
        a.src=g;m.parentNode.insertBefore(a,m)
        })
        (window, document, 'script',
        '//www.google-analytics.com/analytics.js','ga');

        ga('create', 'XXXXXXX', 'auto');
        ga('send', 'pageview');

        </script>"
      )),
...
)

但是,我最近注册了一个新应用,我从Google Analytics获得的跟踪代码是:

<!-- Global site tag (gtag.js) - Google Analytics -->
<script async src="https://www.googletagmanager.com/gtag/js?id=XXXXX"></script>
<script>
  window.dataLayer = window.dataLayer || [];
  function gtag(){dataLayer.push(arguments);}
  gtag('js', new Date());

  gtag('config', 'XXXXX');
</script>

继RStudio的指示,我救了这是google-analytics.js和地质储量tags$head(HTML("..."))我有:

includeScript("google-analytics.js")

但这不起作用.上述链接的说明如下:

警告:includeScript函数将脚本的内容放在一对脚本标记中.如果您将Javascript代码复制并粘贴到.js文件中,请务必删除这些标记

我曾尝试用去除<script>和</script>,以及周围的HTML标记async src="https://www.googletagmanager.com/gtag/js?id=XXXXX",但没有工作.

任何人都可以了解如何正常工作？

Answer 1

根据 Douglas Watson 的这篇文章，您所要做的就是：

1. 将分析 HTML 片段复制到文本文件中。（在与 ui.R 相同的目录中创建了一个名为 google_analytics.R 的文件）

2. 将其包含在 ui.R 中

   shinyUI(fluidPage( tags$head(includeHTML(("google-analytics.html"))), ...