fix spelling

This commit is contained in:
Aron Atkins
2015-02-02 10:09:08 -05:00
parent 4eb18dc797
commit 70ff6658eb

View File

@@ -13,7 +13,7 @@ mpgData$am <- factor(mpgData$am, labels = c("Automatic", "Manual"))
# mpg
shinyServer(function(input, output) {
# Compute the forumla text in a reactive expression since it is
# Compute the formula text in a reactive expression since it is
# shared by the output$caption and output$mpgPlot functions
formulaText <- reactive({
paste("mpg ~", input$variable)