如何在R中使用滑块动态更新直方图的x轴范围
我看到过一些例子,用户使用sliderInput来调整直方图中的箱子数量 但我的问题是,如何使用sliderInput来调整x轴的范围,而不是箱子的数量?我应该包含什么代码 有人能帮我吗?我希望我的问题不是那么麻烦如何在R中使用滑块动态更新直方图的x轴范围,r,user-interface,shiny,shinyapps,R,User Interface,Shiny,Shinyapps,我看到过一些例子,用户使用sliderInput来调整直方图中的箱子数量 但我的问题是,如何使用sliderInput来调整x轴的范围,而不是箱子的数量?我应该包含什么代码 有人能帮我吗?我希望我的问题不是那么麻烦 非常感谢。这是一个基于可用的忠实的数据集的工作演示。我添加了一个滑块put来调整x轴范围。hist包括定义x轴范围的xlim。注:第一个值为下限,第二个值为上限 library(shiny) ui <- fluidPage( sidebarLayout( side
非常感谢。这是一个基于可用的
忠实的数据集的工作演示。我添加了一个滑块put
来调整x轴范围。hist
包括定义x轴范围的xlim
。注:第一个值为下限,第二个值为上限
library(shiny)
ui <- fluidPage(
sidebarLayout(
sidebarPanel(
sliderInput("bins",
"Number of bins:",
min = 1,
max = 50,
value = 30),
sliderInput("x_range", "Range:",
min = 0, max = 100, value = c(0, 100), step = 10)
),
mainPanel(
plotOutput("distPlot")
)
)
)
server <- function(input, output, session) {
output$distPlot <- renderPlot({
x <- faithful[, 2] # Old Faithful Geyser data
bins <- seq(min(x), max(x), length.out = input$bins + 1)
hist(x, breaks = bins, xlim = c(input$x_range[1], input$x_range[2]), col = 'darkgray', border = 'white')
})
}
shinyApp(ui, server)
库(闪亮)
到目前为止你试过什么?请张贴您的密码。非常感谢!这真的很有帮助,真的非常感谢