创建指向闪亮应用程序其他部分的链接 [英] Create link to the other part of the Shiny app
本文介绍了创建指向闪亮应用程序其他部分的链接的处理方法,对大家解决问题具有一定的参考价值,需要的朋友们下面随着小编来一起学习吧!
问题描述
Itroductiion
、Plot 1
和Plot 2
面板的页面报告。在Introduction
面板内,我想添加Plot 1
和Plot 2
面板的引用,以便在单击链接后立即查看此绘图。有可能吗?
ui.R
library(shiny)
shinyUI(
fluidPage(
fluidPage(
titlePanel("Introduction"),
column(12,
p("Lorem ipsum dolor sit amet, consectetur adipisicing elit. Proin
nibh augue, suscipit a, scelerisque sed, lacinia in, mi. Cras vel
lorem. Etiam pellentesque aliquet tellus. Phasellus pharetra nulla
ac diam. Quisque semper justo at risus. Donec venenatis, turpis vel
hendrerit interdum, dui ligula ultricies purus, sed posuere libero
dui id orci. Nam congue, pede vitae dapibus aliquet, elit magna
vulputate arcu, vel tempus metus leo non est. Etiam sit amet lectus
quis est congue mollis. Phasellus congue lacus eget neque. Phasellus
ornare, ante vitae consectetuer consequat, purus sapien ultricies
dolor, et mollis pede metus eget nisi. Praesent sodales velit quis
augue. Cras suscipit, urna at aliquam rhoncus, urna quam viverra nisi,
in interdum massa nibh nec erat."))
),
fluidPage(
titlePanel("Hello Shiny!"),
sidebarLayout(
sidebarPanel(
sliderInput("bins",
"Number of bins:",
min = 1,
max = 50,
value = 30)
),
mainPanel(
plotOutput("distPlot")
)
)
),
fluidPage(
titlePanel("Hello Shiny!"),
sidebarLayout(
sidebarPanel(
sliderInput("bins",
"Number of bins:",
min = 1,
max = 50,
value = 30)
),
mainPanel(
plotOutput("distPlot2")
)
)
))
)
server.R
library(shiny)
shinyServer(function(input, output) {
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, col = 'darkgray', border = 'white')
})
output$distPlot2 <- renderPlot({
x <- faithful[, 2] # Old Faithful Geyser data
bins <- seq(min(x), max(x), length.out = input$bins + 1)
hist(x, breaks = bins, col = 'darkgray', border = 'white')
})
})
HTML
您要查找的是推荐答案anchor tag
。
例如,您可以使用以下命令创建到DistPlot2的锚点:
column(12,p(HTML("intro text <a href='#distPlot2'>Go to plot 2</a> intro text "))))
您可以将#
后面的内容替换为id
要跳转到的任何HTML元素。
这篇关于创建指向闪亮应用程序其他部分的链接的文章就介绍到这了,希望我们推荐的答案对大家有所帮助,也希望大家多多支持IT屋!
查看全文