---
title: "Flexdashboard"
output: flexdashboard::flex_dashboard
---

```{r setup, include=FALSE}
library(flexdashboard)

navbarPage(
  "Flexdashboard",
  id = "navbar",
  selected = "Home",
  icon = icon("home"),
  tags$li(
    title = "Home",
    tags$a(icon("home"), href = "#")
  ),
  tags$li(
    title = "About",
    tags$a(icon("info-circle"), href = "#")
  ),
  tags$li(
    title = "Contact",
    tags$a(icon("envelope"), href = "#")
  )
)

在上述示例代码中，我们创建了一个名为"Flexdashboard"的导航栏页面。在导航栏中，我们添加了三个图标，分别是"Home"、"About"和"Contact"。每个图标都有相应的工具提示。

请注意，上述示例代码中的图标样式类使用了R包`shiny`中的`icon`函数。如果你使用的是其他图标库，可以相应地调整图标样式类。

希望这个答案能够满足你的需求。如果你需要更多帮助，请随时提问。