Commit 7375e412 authored by Virgile Baudrot's avatar Virgile Baudrot
Browse files

add Dispersal video

parent aa10be6e
......@@ -28,11 +28,21 @@ mod_tabItemDispersal_ui <- function(id){
collapsible = TRUE,
closable = FALSE,
footer_padding = FALSE,
p("In this part, you have to compute dispersal probability."),
# img(src = 'www/modelScheme_item_2.jpg', title = "item1", width = "800px"),
hr(),
h4("Check list of previous items:"),
verbatimTextOutput(ns("CheckDispersal"))
verbatimTextOutput(ns("CheckDispersal")),
hr(),
h4("Once all elements in Check list is OK, this part allow to compute dispersal probability."),
# column(width = 6,
# align="center",
h4("Tutorial on running dispersal kernel."),
tags$video(id = ns("videoDispersal"),
type = "video/mp4",
src = "www/dispersal_capture2.mp4",
controls = "controls",
height = "300px")
# ),
)
),
fluidRow( # width of fluidrow is 12
......
......@@ -37,7 +37,7 @@ mod_tabItemLandscape_ui <- function(id){
column(width = 6,
align="center",
h4("Tutorial on building KML landscape files."),
tags$video(id = ns("videoLandscape"),
tags$video(id = ns("videoLandscape_makeKML"),
type = "video/mp4",
src = "www/maizeFieldMap_VIDEO_medium2.mp4",
controls = "controls",
......@@ -46,7 +46,7 @@ mod_tabItemLandscape_ui <- function(id){
column(width = 6,
align="center",
h4("Tutorial on Uploading landscape elements."),
tags$video(id = ns("videoLandscape"),
tags$video(id = ns("videoLandscape_load"),
type = "video/mp4",
src = "www/load_landscape_medium3.mp4",
controls = "controls",
......
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