Commit bc2eb7a0 authored by ashtondrew's avatar ashtondrew

update font sizes on uncertainty and credits tabs

parent bd154049
......@@ -533,7 +533,7 @@ ui <- fluidPage(
fluidRow(
column(3,
h4("Explore and compare how uncertainty about the input data influence the decision tool results. View outcomes as:"),
h5("Explore and compare how uncertainty about the input data influence the decision tool results. View outcomes as:"),
radioButtons("US_Uncertainty_View",
label="",
choices=c("Number of Species Recovered"="NSpp",
......@@ -554,15 +554,15 @@ ui <- fluidPage(
tabPanel("Guide",
conditionalPanel(
condition="input.US_Uncertainty_View=='NSpp'",
tags$div(HTML('<h4><i><font color=\"#FF0000\">If you used these data to predict an outcome from a budget change, how confident could you be in your predctions?</font></i><p><p>Compare graphs across a row to observe the affect of low, moderate, and high uncertainty applied to a set of variables. Compare graphs down a column to observe the affect of applying uncertainty to different combinations of variables. Consider the questions:<p><ul><li>Does the level of uncertainty influence the expectation regarding the how many more (or less) species can be conserved under a budget increase (or decrease)?<p><li>Does the uncertainty in any one variable have a greater influence on the expectations regarding the number of species conserved than other variables?</ul></h4>'))
tags$div(HTML('<h5><i><font color=\"#FF0000\">If you used these data to predict an outcome from a budget change, how confident could you be in your predctions?</font></i><p><p>Compare graphs across a row to observe the affect of low, moderate, and high uncertainty applied to a set of variables. Compare graphs down a column to observe the affect of applying uncertainty to different combinations of variables. Consider the questions:<p><ul><li>Does the level of uncertainty influence the expectation regarding the how many more (or less) species can be conserved under a budget increase (or decrease)?<p><li>Does the uncertainty in any one variable have a greater influence on the expectations regarding the number of species conserved than other variables?</ul></h5>'))
),
conditionalPanel(
condition = "input.US_Uncertainty_View=='Perform'",
tags$div(HTML('<h4><i><font color=\"#FF0000\">If you used these data to predict an outcome from a budget change, how confident could you be in your predctions?</font></i><p><p>Compare graphs across a row to observe the affect of low, moderate, and high uncertainty applied to a set of variables. Compare graphs down a column to observe the affect of applying uncertainty to different combinations of variables. Consider the questions:<p><ul><li>Does the level of uncertainty influence the expectation regarding how much value is gained (or lost) from my conservation portfolio under a budget increase (or decrease)?<p><li>Does the uncertainty in any one variable have a much greater influence on my expectations regarding portfolio performance than other variables?</ul></h4>'))
tags$div(HTML('<h5><i><font color=\"#FF0000\">If you used these data to predict an outcome from a budget change, how confident could you be in your predctions?</font></i><p><p>Compare graphs across a row to observe the affect of low, moderate, and high uncertainty applied to a set of variables. Compare graphs down a column to observe the affect of applying uncertainty to different combinations of variables. Consider the questions:<p><ul><li>Does the level of uncertainty influence the expectation regarding how much value is gained (or lost) from my conservation portfolio under a budget increase (or decrease)?<p><li>Does the uncertainty in any one variable have a much greater influence on my expectations regarding portfolio performance than other variables?</ul></h5>'))
),
conditionalPanel(
condition = "input.US_Uncertainty_View=='InOut'",
tags$div(HTML('<h4><i><font color=\"#FF0000\">If you must make decisions under uncertainty, can you distinguish safe bets from risky ventures?</font></i><p><p>Consider the questions:<p><ul><li>Which species, despite uncertainty, are always included in (or excluded from) the portfolio?</ul></h4>'))
tags$div(HTML('<h5><i><font color=\"#FF0000\">If you must make decisions under uncertainty, can you distinguish safe bets from risky ventures?</font></i><p><p>Consider the questions:<p><ul><li>Which species, despite uncertainty, are always included in (or excluded from) the portfolio?</ul></h5>'))
)
),
tabPanel("Definitions",
......@@ -617,7 +617,7 @@ ui <- fluidPage(
),
fluidRow(
hr(),
h4("View which plans were always, sometimes, and never included in the portfolio under each of the buget levels for a given uncertainty simulation set."),
h5("View which plans were always, sometimes, and never included in the portfolio under each of the buget levels for a given uncertainty simulation set."),
dataTableOutput("US_InOutProbability")
)
......@@ -631,22 +631,22 @@ ui <- fluidPage(
tabPanel("Notes and Credits",
h2("Information about this Recovery Explorer Tool"),
tags$div(
HTML('<h4>This work is part of a broader a project sponsored by the <a href="http://www.sesync.org/project/ventures/esa-decision-making">SESYNC Endangered Species Act Decision Support workgroup</a></h4>')),
h4("The data presented are for demonstration use only. We illustrate the unique perspectives and transparency gained by bringing knowledge and values together within decision analysis and simulation tools. For more information about..."),
HTML('<h5>This work is part of a broader a project sponsored by the <a href="http://www.sesync.org/project/ventures/esa-decision-making">SESYNC Endangered Species Act Decision Support workgroup</a></h5>')),
h5("The data presented are for demonstration use only. We illustrate the unique perspectives and transparency gained by bringing knowledge and values together within decision analysis and simulation tools. For more information about..."),
h4(strong("...the project:")),
tags$div(
HTML('<h4><a href="http://gerberlab.faculty.asu.edu/team/leah-gerber/">Dr. Leah Gerber</a> (project lead PI), Arizona State University</h4>')),
HTML('<h5><a href="http://gerberlab.faculty.asu.edu/team/leah-gerber/">Dr. Leah Gerber</a> (project lead PI), Arizona State University</h5>')),
h4(strong("...the underlying models:")),
tags$div(
HTML('<h4><a href="http://possinghamlab.org/people-new/all-lab-members/564-gwen-iacona.html">Dr. Gwen Iacona</a> (prioritization model), University of Queensland</h4>'),
HTML('<h4><a href="http://stephanieaverygomm.weebly.com/">Stephanie Avery-Gomm</a> (uncertainty simulations), University of Queensland</h4>')),
HTML('<h5><a href="http://possinghamlab.org/people-new/all-lab-members/564-gwen-iacona.html">Dr. Gwen Iacona</a> (prioritization model), University of Queensland</h5>'),
HTML('<h5><a href="http://stephanieaverygomm.weebly.com/">Stephanie Avery-Gomm</a> (uncertainty simulations), University of Queensland</h5>')),
h4(strong("...the decision visualization tool:")),
tags$div(
HTML('<h4><a href="http://www.kdv-decisions.com/">Dr. Ashton Drew</a> (app development), KDV Decision Analysis LLC</h4>')),
HTML('<h5><a href="http://www.kdv-decisions.com/">Dr. Ashton Drew</a> (app development), KDV Decision Analysis LLC</h5>')),
h4(strong("...successful application of prioritization strategies at a national level:")),
tags$div(
HTML('<h4>Dr. Richard Maloney, New Zealand Department of Conservation</h4>'),
HTML('<h4><a href="http://www.possinghamlab.org/">Dr. Hugh Possingham</a>, University of Queensland</h4>'))
HTML('<h5>Dr. Richard Maloney, New Zealand Department of Conservation</h5>'),
HTML('<h5><a href="http://www.possinghamlab.org/">Dr. Hugh Possingham</a>, University of Queensland</h5>'))
)
)
......
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