我想问一下在包含rmarkdown功能时如何将shiny保存为html。
我知道保存基本的降价很热，但是当包含闪亮的内容时，并不能直接做到
例如，是否可以将下面的代码另存为交互式html？
---
title: "Line graph"
output: html_notebook
runtime: shiny
---
library(shiny)
library(ggplot2)
selectInput("data","Proměnné modelu",names(mtcars))
renderPlot({
x <- input$data
ggplot(mtcars, aes_string(x)) +
geom_histogram(bins = 15, color = "black", fill = "dodgerblue", aes(y=..density..)) +
geom_density(inherit.aes = T, fill="#FF6666", alpha = 0.2)
})
model <- lm(hp ~ mpg + gear + cyl + disp, data = mtcars)
stargazer::stargazer(model, type = "text")