From 2cbd3588fc443d7b64397e98cbc1989b52069585 Mon Sep 17 00:00:00 2001 From: JJ Allaire Date: Tue, 24 Jul 2012 12:34:08 -0700 Subject: [PATCH] updated side nav and target divs --- tutorial/index.html | 343 ++++++++++++++++++++++++-------------------- 1 file changed, 186 insertions(+), 157 deletions(-) diff --git a/tutorial/index.html b/tutorial/index.html index d8415a6d1..888749ab8 100644 --- a/tutorial/index.html +++ b/tutorial/index.html @@ -1,25 +1,26 @@ - - - Tutorial: Building 'shiny' Web Applications with R - + + +Tutorial: Building 'shiny' Web Applications with R + - - - + + + - - + + @@ -64,76 +65,87 @@ var hljs=new function(){function m(p){return p.replace(/&/gm,"&").replace(/< hljs.initHighlightingOnLoad(); + + - + +
+
+
+ + Tutorial: Building 'shiny' Web Applications with R + shiny on GitHub +
+
+
- - -
-
-
- - Tutorial: Building 'shiny' Web Applications with R - shiny on GitHub -
-
-
+ +
+
-
+ +
+ +
+ + +
+ + +
+welcome to shiny + + + +
-
-
- -
- -
-
- - + + +
+

You can install shiny directly from github using the devtools package. In order to install shiny you'll also need to be configured to build R packages from source. To install devtools and verify that you can build packages from source:

install.packages("devtools")
@@ -166,22 +178,20 @@ runExample("01_hello")

If everything is installed and working correctly a browser will open and navigate to the running application.

- - - -
- -
- + + + +
+ + + +
+

Screenshot

- + @@ -190,82 +200,101 @@ runExample("01_hello") 
library(shiny)
 runExample("hello")
- +

ui.R

library(shiny)
-
-shinyUI(
-  pageWithSidebar(
-
-    headerPanel(
+shinyUI(pageWithSidebar(
+   headerPanel(
       h1("Hello shiny!")
-    ),
-
-    sidebarPanel(
+   ),
+   sidebarPanel(
       numericInput("obs", 
                    "Number of observations:", 
-                   min = 0, 
+                   min = 1, 
                    max = 10000, 
                    value = 500)
-    ),
-
-    mainPanel(
+   ),
+   mainPanel(
       plotOutput("plot")
-    )
-  )
-)
+   )
+))
- +

server.R

- + 
library(shiny)
-
 shinyServer(function(input, output) {
-
-    output$plot <- reactivePlot(function() {
-
-        obs <- as.integer(input$obs)
-
-        hist(rnorm(obs))
-    })
-
+   output$plot <- reactivePlot(function() {
+      obs <- as.integer(input$obs)
+      hist(rnorm(obs))
+   })
 })
- +
- - -
- - -
- - -
- Reactive -
- - - -
-
- -
+ +
+Shiny Text +
- - - - - - - + +
+Reativity +
+ + + +
+UI and Server +
+ + +
+Inputs and Outputs +
+ + +
+Edit, Run, Debug +
+ + +
+Sliders +
+ + +
+Animation +
+ + +
+Tabsets +
+ + +
+HTML UI +
+ + + + + + + +
+ +
+ + + + + + + +