Skip to content

Instantly share code, notes, and snippets.

@zappingseb
Created July 16, 2019 08:23
Show Gist options
  • Save zappingseb/690ca39e8598a683ddaae14c84529996 to your computer and use it in GitHub Desktop.
Save zappingseb/690ca39e8598a683ddaae14c84529996 to your computer and use it in GitHub Desktop.
# Plot Regression vs fitted
output$plot1 <- metaRender(renderPlot, {
plot(!!model_reactive(), which = 1)
})
# show model summary
output$text1 <- metaRender(renderPrint, {
!!model_reactive() %>% summary()
})
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment