Studi Kasus: Membangun Aplikasi Web dengan Shiny di R
Dean Attali
Shiny Consultant



ui <- fluidPage(
textInput(inputId = "name", label = "Enter your name",
value = "Dean"),
numericInput(inputId = "sibs", label = "How many siblings?",
value = 4, min = 0)
)
*Input(inputId, label, ...)inputId = ID uniklabel = Teks yang menjelaskan input... = Parameter tambahan khusus inputDua langkah:
Buat placeholder untuk output (di UI)
ui <- fluidPage(
"Plot goes here:",
plotOutput(outputId = "my_plot")
)
Tulis kode R untuk membuat output (di server)
server <- function(input, output) {
# Code for building outputs
}
inputoutputui <- fluidPage( numericInput("num", "Number of rows", value = 10, min = 0), tableOutput("my_table") )server <- function(input, output) { output$my_table <- renderTable({ head(iris, n = input$num) }) }
renderPlot(), renderText(), dll.)output$<outputId>input$<inputId> untuk mengakses nilai inputStudi Kasus: Membangun Aplikasi Web dengan Shiny di R