Раскрывающееся меню с R выходами, используя Shiny в R Markdown - PullRequest
0 голосов
/ 24 мая 2018

Я совершенно новичок в Shiny, поэтому сначала извиняюсь за неопытность.

Я пишу динамический отчет с использованием R Markdown, и у меня есть несколько графиков, которые заслуживают динамического отображения.

Давайте поработаем с набором данных mtcars и создадим 4 графика:

plot1 <- plot(mtcars$mpg)
plot2 <- plot(mtcars$cyl)
plot3 <- plot(mtcars$hp)
plot4 <- plot(mtcars$qsec)

Итак, как я могу создать выпадающее меню с соответствующим отображением этих четырех графиков?

1 Ответ

0 голосов
/ 24 мая 2018

Я имею в виду, что ваш пример - самый простой блестящий пример, который я когда-либо видел на stackoverflow.Я советую вам потратить немного времени на изучение этого руководства, затем попытаться создать собственное приложение, и если вы застряли, вернитесь сюда:)

Чтобы научиться блестящему, я рекомендую Учебное пособие по Rstudio .После изучения и повторного забывания я советую вам использовать замечательную таблицу, предоставленную Rstudio .

app.r выглядит следующим образом:

library(shiny)
library(plotly)

### ui.r
ui <- fluidPage(selectInput('my_dropdown','Choose Column',colnames(mtcars)),
                plotOutput('my_plot')
)

  ### server.r
  server <- function(input, output) {
    output$my_plot <- renderPlot(
      plot(mtcars[,input$my_dropdown],ylab=input$my_dropdown,xlab='value')
    )
  }
shinyApp(ui,server)

Только дляради полноты.Этот тип графика может быть создан с использованием plotly.Преимущество заключается в том, что вы можете использовать это в автономном html.Недостатком является то, что выпадающие с плотно достаточно интенсивно кода.Учебное пособие для plotly здесь: https://plot.ly/r/dropdowns/

...