Commit 8ccde276 authored by Delaigue Olivier's avatar Delaigue Olivier

v0.2.9.14 UPDATE: new navbar (strcture, icons and names of the tab panels revised, and links added)

parent 099f77ea
Package: airGRteaching
Type: Package
Title: Teaching Hydrological Modelling with the GR Rainfall-Runoff Models ('Shiny' Interface Included)
Version: 0.2.9.13
Version: 0.2.9.14
Date: 2020-03-27
Authors@R: c(
person("Olivier", "Delaigue", role = c("aut", "cre"), comment = c(ORCID = "0000-0002-7668-8468"), email = "airGR@inrae.fr"),
......
......@@ -4,7 +4,7 @@
### 0.2.9.13 Release Notes (2020-03-27)
### 0.2.9.14 Release Notes (2020-03-27)
____________________________________________________________________________________
......
......@@ -32,8 +32,8 @@ navbarPage(title = div("airGRteaching",
),
tabPanel(title = "Interface",
icon = icon("bar-chart"),
tabPanel(title = "Modelling",
icon = icon("area-chart"),
shinyjs::useShinyjs(), # set up shinyjs
......@@ -193,20 +193,35 @@ navbarPage(title = div("airGRteaching",
),
tabPanel(title = "Summary sheet",
icon = icon("th"),
sidebarPanel(width = 3,
h4("Choose a dataset:"),
fluidRow(column(width = 12, selectInput("DatasetSheet", label = NULL, choices = .ShinyGR.args$NamesObsBV)),
style = "height:720px;")),
mainPanel(width = 9,
fluidRow(uiOutput("Sheet")))
),
tabPanel(title = "Functionalities",
fluidRow(column(6, includeMarkdown("www/tab_fun.md"))),
icon = icon("cog")
sidebarLayout(position = "left",
sidebarPanel(width = 3,
h4("Choose a dataset:"),
fluidRow(column(width = 12, selectInput("DatasetSheet", label = NULL, choices = .ShinyGR.args$NamesObsBV)),
style = "height:720px;")),
mainPanel(width = 9,
fluidRow(uiOutput("Sheet")))
)
),
tabPanel(title = "About",
fluidRow(column(6, includeMarkdown("www/tab_about.md")),
column(5, includeMarkdown("www/tab_authors.md"))),
icon = icon("navicon")
navbarMenu(title = "Help",
icon = icon("question-circle"),
tabPanel(title = " Get started",
icon = icon("cog"),
fluidRow(column(width = 12, includeMarkdown("www/tab_fun.md")))
),
tabPanel(title = "GUI help",
icon = icon("question"),
fluidRow(column(width = 12, a(href = "https://hydrogr.github.io/airGRteaching/fig/airGRteaching_ShinyUi_description.png", target = "_blank", rel = "noopener noreferrer",
img(src = "https://hydrogr.github.io/airGRteaching/fig/airGRteaching_ShinyUi_description.png", height = "770px",
alt = "If the image does not appear, click on this link.",
title = "Click to open in a new window")))),
),
tabPanel(title = a(icon("r-project"), "CRAN" , href = "https://CRAN.R-project.org/package=airGRteaching" , target = "_blank", rel = "noopener noreferrer")),
tabPanel(title = a(icon("at") , "Website", href = "https://hydrogr.github.io/airGRteaching/" , target = "_blank", rel = "noopener noreferrer")),
tabPanel(title = a(icon("gitlab") , "GitLab" , href = "https://gitlab.irstea.fr/HYCAR-Hydro/airgrteaching/", target = "_blank", rel = "noopener noreferrer")),
tabPanel(title = "About",
icon = icon("navicon"),
fluidRow(column(width = 6, includeMarkdown("www/tab_about.md")),
column(width = 5, includeMarkdown("www/tab_authors.md"))),
)
)
)
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment