Commit 239f5e40 authored by Virgile Baudrot's avatar Virgile Baudrot

update parameter emission

parent a5bea80a
......@@ -83,8 +83,8 @@ header <- dashboardHeader(
title = "EFSA Home", height = "30px"),
style = "padding-top:10px; padding-bottom:10px;"),
class = "dropdown"),
tags$li(a(href = 'https://www.inra.fr',
img(src = 'www/logo_INRA.png',
tags$li(a(href = 'https://www.inrae.fr',
img(src = 'www/logo_INRAE.png',
title = "INRA Home", height = "30px"),
style = "padding-top:10px; padding-bottom:10px;"),
class = "dropdown"),
......
......@@ -81,7 +81,7 @@ mod_tabItemEmission_ui <- function(id){
min = 0, max = 10),
numericInput(inputId = ns("pollenSCALE"),
label = "Pollen scale",
value = 5*10^5#,
value = 1*10^6#,
#in = 0, max = 1
),
br(),
......
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