Commit 3f6ceae8 authored by Kai Husmann's avatar Kai Husmann
Browse files

description update

parent 37621577
......@@ -29,7 +29,7 @@ library(readxl)
ui <- navbarPage(title = img(src="Logo_TUM_GOE.jpg", height = "40px", width = "250px"), id = "navBar",
theme = "test.css",
# inverse = TRUE,
windowTitle = "Robust multi-criterial optimization",
windowTitle = "Robust multi-criterial landscape optimization",
position = "fixed-top",
header = tags$style(
".navbar-right {
......@@ -54,45 +54,45 @@ ui <- navbarPage(title = img(src="Logo_TUM_GOE.jpg", height = "40px", width = "2
column(3),
column(6,
shiny::HTML("<br><br><center> <h1>What you'll find here</h1> </center><br>"),
shiny::HTML("<h4> Text
shiny::HTML("<h4> This shiny app provides a graphical user interface for the optimLanduse R package. Aim of the app is to simplify the usage of optimLanduse and to explain its functionality visually. It also has potential to transfer the results of the optimization to persons of interest.
</h4>")
),
column(3)
),
fluidRow(
style = "height:50px;"),
# PAGE BREAK
tags$hr(),
# HOW
fluidRow(
column(3),
column(6,
shiny::HTML("<br><br><center> <h1>How it can help you</h1> </center><br>"),
shiny::HTML("<h5>Text</h5>")
),
column(3)
),
# fluidRow(
#
# style = "height:50px;"),
#
# # PAGE BREAK
# tags$hr(),
#
# # HOW
# fluidRow(
# column(3),
# column(6,
# shiny::HTML("<br><br><center> <h1>How it can help you</h1> </center><br>"),
# shiny::HTML("<h5>Text</h5>")
# ),
# column(3)
# ),
fluidRow(
style = "height:50px;"),
# PAGE BREAK
tags$hr(),
# WHERE
fluidRow(
column(3),
column(6,
shiny::HTML("<br><br><center> <h1>Where it came from</h1> </center><br>"),
shiny::HTML("<h5>Text</h5>")
),
column(3)
),
# fluidRow(
#
# style = "height:50px;"),
#
# # PAGE BREAK
# tags$hr(),
#
# # WHERE
# fluidRow(
# column(3),
# column(6,
# shiny::HTML("<br><br><center> <h1>Where it came from</h1> </center><br>"),
# shiny::HTML("<h5>Text</h5>")
# ),
# column(3)
# ),
fluidRow(
......@@ -106,7 +106,7 @@ ui <- navbarPage(title = img(src="Logo_TUM_GOE.jpg", height = "40px", width = "2
column(3),
column(6,
shiny::HTML("<br><br><center> <h1>How to get started</h1> </center><br>"),
shiny::HTML("<h5>Text.</h5>")
shiny::HTML("<h4>You can either upload your own dataset with expected land-use outcomes of indicators and their uncertainties (the format specifications must be strictly followed) or try the given exemplary database from the GitLab repository. Click 'Upload File' to start and 'Model' to perform the optimization and evaluate the results.</h4>")
),
column(3)
)),
......
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