## ----include = FALSE---------------------------------------------------------- knitr::opts_chunk$set( collapse = TRUE, comment = "#>" ) ## ----grading-app-run, eval=FALSE, echo=TRUE----------------------------------- # library(shiny) # runApp(system.file(file.path('shiny', 'grading_app', 'app.R'), # package = 'autoharp'))