shiny 下载图片

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

在shiny提供的例子中，如何下载直方图？

library(shiny)# Define UI for application that plots random distributions shinyUI(pageWithSidebar(  # Application title  headerPanel("Hello Shiny!"),  # Sidebar with a slider input for number of observations  sidebarPanel(    sliderInput("obs",                 "Number of observations:",                 min = 1,                max = 1000,                 value = 500)  ),  # Show a plot of the generated distribution  mainPanel(    plotOutput("distPlot")  )))library(shiny)# Define server logic required to generate and plot a random distributionshinyServer(function(input, output) {  # Expression that generates a plot of the distribution. The expression  # is wrapped in a call to renderPlot to indicate that:  #  #  1) It is "reactive" and therefore should be automatically   #     re-executed when inputs change  #  2) Its output type is a plot   #  output$distPlot <- renderPlot({    # generate an rnorm distribution and plot it    dist <- rnorm(input$obs)    hist(dist)  })})

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：Shiny Shin distribution observations Application 下载图片