Я создаю приложение R Shiny и у меня есть actionButton, который при нажатии открывает набор инструкций. Эти инструкции сохраняются в файле HTML, который сохраняется в папке my / Data. Поскольку открываемое modalDialog немного длинное, я хочу предложить пользователю возможность щелкнуть ссылку в диалоговом окне, которое откроет тот же HTML-файл в новой вкладке.
Я попытался добавить href в свой HTML-файл, но это не работает (и, возможно, рекурсивно?).
Минимальный код, необходимый для воссоздания этого здесь:
hsHTML <- htmlTemplate("Health stats user guide.html")
ui <- mainPanel( id = "mainpanel",
actionButton("hsinstructions","User guide")
)
server <- function(input, output, session) {
observeEvent(input$hsinstructions, {
showModal(modalDialog(
title = HTML("<font size='6'>User Guide</font>"),
HTML(paste0(hsHTML)),
easyClose = T,
footer = modalButton("Dismiss")
))
})
}
shinyApp(ui = ui, server = server)
И сокращенная версия HTML, содержащаяся в «Руководстве пользователя по статистике работоспособности», содержит следующее:
<html>
<body>
<font size='5'><strong>Instructions</strong></font><br>
<a href="Health stats user guide.html" target="_blank">Open in new tab</a><br>
</body>
</html>
Мне нужна ссылка «Открыть на новой вкладке», чтобы открыть тот же HTML-файл, но на новой вкладке. В настоящее время он просто возвращает новую вкладку с надписью «Not Found».