From cee135b0c0f6dd186ae7f69f2f47c4f3b958c435 Mon Sep 17 00:00:00 2001 From: jranke Date: Fri, 28 Jun 2013 14:24:06 +0000 Subject: A bit of experimentation with shiny git-svn-id: svn+ssh://svn.r-forge.r-project.org/svnroot/kinfit/pkg/mkin@85 edb9625f-4e0d-4859-8d74-9fd3b1da38cb --- inst/GUI/server.R | 9 +++++++++ inst/GUI/ui.R | 14 ++++++++++++++ 2 files changed, 23 insertions(+) create mode 100644 inst/GUI/server.R create mode 100644 inst/GUI/ui.R diff --git a/inst/GUI/server.R b/inst/GUI/server.R new file mode 100644 index 0000000..12386f2 --- /dev/null +++ b/inst/GUI/server.R @@ -0,0 +1,9 @@ +library(shiny) + +shinyServer(function(input, output) { + output$test <- renderText({ + input$test + }) +}) + +# vim: set ts=2 sw=2 foldmethod=marker expandtab: diff --git a/inst/GUI/ui.R b/inst/GUI/ui.R new file mode 100644 index 0000000..2b0b868 --- /dev/null +++ b/inst/GUI/ui.R @@ -0,0 +1,14 @@ +library(shiny) +shinyUI(pageWithSidebar( + + headerPanel("shiny GUI for mkin"), + + sidebarPanel( + textInput("test", "Test:", "test input") + ), + + mainPanel( + textOutput("test") + ) +)) +# vim: set ts=2 sw=2 foldmethod=marker expandtab: -- cgit v1.2.1