Shiny app for predicting words - UI code

ui.R

#
# This is the user-interface definition the word-predictor application. You can
# run the application by clicking 'Run App' above.
#
# Find out more about building applications with Shiny here:
#
#    http://shiny.rstudio.com/
#

library(shiny)

# Define UI for application
shinyUI(fluidPage(

    # Application title
    titlePanel("Word Predictor"),
    # Horizontal rule
    hr(),
    
    # Sidebar with a slider input for number of bins
    sidebarLayout(
        sidebarPanel(
            # The input field
            textInput("ngram", "Enter a n-gram:")
        ),

        # Show a plot of the possible predicted words
        mainPanel(
            # The predicted word
            uiOutput("next_word"),
            # The predicted word probability
            uiOutput("word_prob"),
            # Horizontal rule
            hr(),
            # The bar plot of possible next words
            plotOutput("next_word_plot")
        )
    )
))