R Hays
05082021
1) Create a data product to demonstrate my prediction algorithm that accepts an n-gram and predicts the next word.
2) Create a slide deck promoting my product and publish it to RPubs.
3) Create a github repository to store all code and data files
My Shiny predictive app is based upon a subset of the SwiftKey data linked below. I used the SBO package (https://vgherard.github.io/sbo/articles/sbo.html).
The user may enter one or more words and the APP will return the top three prediction suggestions.
Copora Data:
https://web-beta.archive.org/web/20160930083655/http://www.corpora.heliohost.org/aboutcorpus.html
Shiny_APP location on ShinyApps:
https://rhays.shinyapps.io/PredictionAPP/?_ga=2.54588587.1215427044.1620479885-1122341922.1619561811
Shiny App ui.R and server.R:
shinyserver <- function(input, output) {
output$result_output <-renderText({
predict(corpus_train,input$text)
})
}