footer

0eb13496 · Midoux Cedric · d16fa1de · 0eb13496
Commit 0eb13496 authored 6 years ago by Midoux Cedric
Hide whitespace changes
Inline Side-by-side

Showing

with 17 additions and 4 deletions
+17 -4
--- a/ui.R
+++ b/ui.R
@@ -72,8 +72,21 @@ shinyUI(dashboardPage(
      tabPanel(
        "Summary",
        verbatimTextOutput("phyloseqPrint"),
-        withLoader(uiOutput("summaryTable"))
-      ),
+        withLoader(uiOutput("summaryTable")),
+        tags$footer(
+          "Questions, problems or comments regarding this application should be sent to ",
+          a(href = "mailto:cedric.midoux@irstea.fr?subject=[Easy16S]", "cedric.midoux@irstea.fr"),
+          align = "center",
+          style = "position:absolute;
+          bottom: 0;
+          width: 100%;
+          color: grey;
+          padding: 10px;
+          # background-color: white;
+          z-index: 1000;
+          "
+        )
+        ),
      tabPanel("Global barplot",
               withLoader(plotOutput("histo", height = 700)),
               uiOutput("histUI")),
@@ -157,6 +170,6 @@ shinyUI(dashboardPage(
          a(href = "mailto:cedric.midoux@irstea.fr?subject=[Easy16S]", "cedric.midoux@irstea.fr")
        )
      )
+        )
    )
-  )
-))
+  ))