Search icon CANCEL
Arrow left icon
Explore Products
Best Sellers
New Releases
Books
Videos
Audiobooks
Learning Hub
Conferences
Free Learning
Arrow right icon
Arrow up icon
GO TO TOP
Learning Shiny

You're reading from   Learning Shiny Make the most of R's dynamic capabilities and implement web applications with Shiny

Arrow left icon
Product type Paperback
Published in Oct 2015
Publisher
ISBN-13 9781785280900
Length 246 pages
Edition 1st Edition
Languages
Tools
Arrow right icon
Authors (2):
Arrow left icon
Hernan Resnizky Hernan Resnizky
Author Profile Icon Hernan Resnizky
Hernan Resnizky
Hernan Resnizky Hernan Resnizky
Author Profile Icon Hernan Resnizky
Hernan Resnizky
Arrow right icon
View More author details
Toc

Table of Contents (13) Chapters Close

Preface 1. Introducing R, RStudio, and Shiny FREE CHAPTER 2. First Steps towards Programming in R 3. An Introduction to Data Processing in R 4. Shiny Structure – Reactivity Concepts 5. Shiny in Depth – A Deep Dive into Shiny's World 6. Using R's Visualization Alternatives in Shiny 7. Advanced Functions in Shiny 8. Shiny and HTML/JavaScript 9. Interactive Graphics in Shiny 10. Sharing Applications 11. From White Paper to a Full Application Index

UI.R completion


The only thing remaining to do in order to have a fully functional application is display the outputs in UI.R. As it was explained before, each render variable has a corresponding output counterpart. Back to our example, as explained in the following sections this is how UI.R is completed.

UI.R

As it has been explained, every output name corresponds to an object in the output list created in server.R:

library(shiny)

# Starting line
shinyUI(fluidPage(
 
 # Application title
 titlePanel("Adult Dataset"),
 
 sidebarLayout(
   
   # Sidebar
   
   sidebarPanel(
     h1("Gender"),
     checkboxGroupInput("gender", "Choose the genders",
     choices = levels(data.adult$sex),
     selected = levels(data.adult$sex)),
     h1("Age"),
     sliderInput("minage", "Select lower limit", min(data.adult$age), max(data.adult$age), value = min(data.adult$age), step = 1),
     sliderInput("maxage", "Select upper limit", min(data.adult$age), max(data.adult$age), value = max(data.adult$age), step...
lock icon The rest of the chapter is locked
Register for a free Packt account to unlock a world of extra content!
A free Packt account unlocks extra newsletters, articles, discounted offers, and much more. Start advancing your knowledge today.
Unlock this book and the full library FREE for 7 days
Get unlimited access to 7000+ expert-authored eBooks and videos courses covering every tech area you can think of
Renews at $19.99/month. Cancel anytime