Adjust layout

igordot · Oct 16, 2024 · 72b51b0 · 72b51b0
1 parent b47eaa4
commit 72b51b0
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 11 deletions.
diff --git a/app.R b/app.R
@@ -42,7 +42,6 @@ if (!identical(clusters_ordered, names(colors_clusters))) stop("unexpected color
 ui <- fluidPage(
 
   # layout: header ----
-  tags$head(includeHTML("gtag.html")),
   theme = shinytheme("paper"),
 
   # layout: title ----
@@ -119,7 +118,8 @@ ui <- fluidPage(
     ),
     column(
       width = 4,
-      includeMarkdown("text.data.md")
+      includeMarkdown("text.data.md"),
+      HTML('<script data-goatcounter="https://cellularshinyapps.goatcounter.com/count" async src="//gc.zgo.at/count.js"></script>')
     )
 
   ),

diff --git a/gtag.html b/gtag.html