Question

我有一个正在运行的R Shiny应用程序，但是为了满足可访问性要求（例如，使盲人的网页阅读器可以使用目标网页进行操作），语言属性（lang ="en"）应该为设置在主要的html标签中，即：<!doctype html> <html lang="en"> <head> .....

我有以dashboardPage()函数开头的ui.R代码，但是如果输入例如HTML("<html lang='en'>")进入其任何参数-生成的应用程序的源代码将在正文中显示此行（由dashboardBody()创建），而我需要在最顶部的<html>标记中（假定已创建）呈现应用程序的UI时由闪亮的包本身）。

这就是我所得到的（查看正在运行的闪亮应用程序的源html代码时：

<!DOCTYPE html>
<html>
<head>

我需要的东西如下：

<!DOCTYPE html> 
<html class="no-js" lang="en"> 
<head>

Answer 1

你可以

tags$html(class = "no-js", lang="en")

我不使用Shinydashboard，但我认为您必须将此代码放在dashboardBody中。

Answer 2

您可以使用head标签在常规HTML <head></head>中包含所有内容。

ui <- fluidPage(
  tags$head(HTML("<html lang='en'>"))
)

如何为Shiny应用程序设置主标记的属性（在源代码顶部）

2 个答案: