Add home page button

JGCRI · Dec 18, 2023 · 26020e2 · 26020e2
1 parent 1a92c09
commit 26020e2
Show file tree

Hide file tree

Showing 2 changed files with 19 additions and 2 deletions.
diff --git a/h2/app.r b/h2/app.r
@@ -16,7 +16,23 @@ ui <- fluidPage(theme = shinythemes::shinytheme("readable"),
     title = "",
     collapsible = TRUE,
     tabPanel(title = "Home",
-             includeHTML("./components/layout/homepage.html")),
+             fluidRow(
+                 column(7,
+                        includeHTML("./components/layout/homepage.html")
+                 ),
+                 column(4, div(
+                     br(),
+                     br(),
+
+                     actionButton(inputId = "launch_scenario",
+                                  label = "Explore Hector",
+                                  style = "background: #4174C3; color: white;
+                                                             font-size: 24px; padding: 32px 24px;
+                                                             box-shadow: 0 8px 16px 0 rgba(0,0,0,0.2), 0 6px 20px 0 rgba(0,0,0,0.19);"),
+                     align = "center"
+                 ))
+             )
+    ),
     tabPanel(title = "Guides"),
     tabPanel(title = "Run Hector",
              fluidRow(
@@ -33,6 +49,7 @@ ui <- fluidPage(theme = shinythemes::shinytheme("readable"),
 
 server <- function(input, output, session) {
   r6 <- HectorInputs$new() # r6 class
+  observeEvent(input$launch_scenario, updateTabsetPanel(session, "nav", selected = "Run Hector"), ignoreInit = TRUE)
 
   run_server("run_1", r6 = r6)
   summary_server("summary_1", r6 = r6)

diff --git a/h2/components/layout/footer.html b/h2/components/layout/footer.html
@@ -1 +1 @@
-<p class = "sticky-footer" > This research was supported in part by the  <a href = "https://www.energy.gov/science/office-science"> U.S. Department of Energy, Office of Science</a> , as part of research in <a href = "https://climatemodeling.science.energy.gov/program/multisector-dynamics"> MultiSector Dynamics </a> Earth and Environmental System Modeling Program. <a href = "https://www.pnnl.gov/"> The Pacific Northwest National Laboratory </a> is operated for DOE by Battelle Memorial Institute. The authors also received support for this research through the U.S. Environmental Protection Agency. </p>
+<p class = "sticky-footer" > This research was supported in part by the  <a href = "https://www.energy.gov/science/office-science"> U.S. Department of Energy, Office of Science,</a> as part of research in <a href = "https://climatemodeling.science.energy.gov/program/multisector-dynamics"> MultiSector Dynamics </a> Earth and Environmental System Modeling Program. <a href = "https://www.pnnl.gov/"> The Pacific Northwest National Laboratory </a> is operated for DOE by Battelle Memorial Institute. The authors also received support for this research through the U.S. Environmental Protection Agency. </p>
Original file line number	Diff line number	Diff line change
		@@ -1 +1 @@
		<p class = "sticky-footer" > This research was supported in part by the <a href = "https://www.energy.gov/science/office-science"> U.S. Department of Energy, Office of Science</a> , as part of research in <a href = "https://climatemodeling.science.energy.gov/program/multisector-dynamics"> MultiSector Dynamics </a> Earth and Environmental System Modeling Program. <a href = "https://www.pnnl.gov/"> The Pacific Northwest National Laboratory </a> is operated for DOE by Battelle Memorial Institute. The authors also received support for this research through the U.S. Environmental Protection Agency. </p>
		<p class = "sticky-footer" > This research was supported in part by the <a href = "https://www.energy.gov/science/office-science"> U.S. Department of Energy, Office of Science,</a> as part of research in <a href = "https://climatemodeling.science.energy.gov/program/multisector-dynamics"> MultiSector Dynamics </a> Earth and Environmental System Modeling Program. <a href = "https://www.pnnl.gov/"> The Pacific Northwest National Laboratory </a> is operated for DOE by Battelle Memorial Institute. The authors also received support for this research through the U.S. Environmental Protection Agency. </p>