Skip to content

Commit

Permalink
urls
Browse files Browse the repository at this point in the history
  • Loading branch information
christophsax committed Mar 24, 2024
1 parent 583306e commit c937d3a
Show file tree
Hide file tree
Showing 2 changed files with 8 additions and 11 deletions.
11 changes: 4 additions & 7 deletions README.md
Original file line number Diff line number Diff line change
Expand Up @@ -63,15 +63,12 @@ showcases how a local version of
**seasonalview** is free and open source, licensed under GPL-3. It is built on
top of a large number of great open source tools. It uses
[shiny](https://cran.r-project.org/package=shiny) and
[shinydashboard](https://cran.r-project.org/package=shinydashboard), through
which it accesses [jQuery](https://jquery.com),
[bootstrap](http://getbootstrap.com) and
[AdminLTE](https://almsaeedstudio.com/themes/AdminLTE/index2.html), which in
turn depend on a plethora of open source web technologies themselves. It also
uses [dygraphs](http://dygraphs.com), and, of course,
[shinydashboard](https://cran.r-project.org/package=shinydashboard).
It also
uses [dygraphs](https://dygraphs.com/), and, of course,
[seasonal](https://cran.r-project.org/package=seasonal),
[x13binary](https://cran.r-project.org/package=x13binary) and
[X-13ARIMA-SEATS](https://www.census.gov/srd/www/x13as/), the wonderful seasonal
X-13ARIMA-SEATS, the wonderful seasonal
adjustment software by the U.S. Census Bureau.

Thanks for your feedback, your ideas and bug-reports. [Contact me.](mailto:christoph.sax@gmail.com)
8 changes: 4 additions & 4 deletions inst/app/server.R
Original file line number Diff line number Diff line change
Expand Up @@ -177,7 +177,7 @@ output$oSummaryTests <- shiny::renderUI({
shiny::HTML(seasonalview:::html_tests(rModel$seas))
})

# terminal
# terminal
output$oTerminal <- shiny::renderUI({
m <- rModel$seas
cstr <- seasonalview:::format_seascall(m$call)
Expand All @@ -186,7 +186,7 @@ output$oTerminal <- shiny::renderUI({
)
})

# x13terminal
# x13terminal
output$oTerminalX13 <- shiny::renderUI({
m <- rModel$seas
cstr <- seasonal:::deparse_spclist(m$spc)
Expand All @@ -198,7 +198,7 @@ output$oTerminalX13 <- shiny::renderUI({

# --- stories ------------------------------------------------------------------

# show dom only if code is present
# show dom only if code is present
output$oStory <- shiny::renderUI({
story <- rStory$story
view.no <- rStory$view.no
Expand Down Expand Up @@ -442,4 +442,4 @@ shiny::observe({
}
})

})
})

0 comments on commit c937d3a

Please sign in to comment.