aboutsummaryrefslogtreecommitdiff
path: root/inst
diff options
context:
space:
mode:
authorjranke <jranke@edb9625f-4e0d-4859-8d74-9fd3b1da38cb>2013-06-28 14:24:06 +0000
committerjranke <jranke@edb9625f-4e0d-4859-8d74-9fd3b1da38cb>2013-06-28 14:24:06 +0000
commitcee135b0c0f6dd186ae7f69f2f47c4f3b958c435 (patch)
tree745676a7e26e95165fe0e16cb7b97bdfe4c8d225 /inst
parent7842ae864c155bbbba82fd8c6d9b1cdd5497dcb2 (diff)
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
Diffstat (limited to 'inst')
-rw-r--r--inst/GUI/server.R9
-rw-r--r--inst/GUI/ui.R14
2 files changed, 23 insertions, 0 deletions
diff --git a/inst/GUI/server.R b/inst/GUI/server.R
new file mode 100644
index 00000000..12386f29
--- /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 00000000..2b0b8687
--- /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:

Contact - Imprint