R语言如何使用图标与可编辑

mrphzbgm 于 2023-07-31 发布在其他

关注(0)|答案(1)|浏览(110)

在处理一个闪亮的应用程序（没有rmarkdown）时，我想将列的可视化表示添加到数据表中。受this question的启发，我制作了

dat <- data.frame(
    what=letters[1:15],
    value=rnorm(15)
) |> transform(
    direction=ifelse(abs(value)<0.1, "&#8646;", ifelse(value<0, "&#8595;", "&#8593;"))
) |> knitr::kable(format="html", escape=FALSE) |>
    kableExtra::kable_styling() # show in browser
dat

字符串
看起来像这样

的数据
但是，我更愿意像这样使用shiny::icon("circle-up")：

down <- as.character(shiny::icon("circle-down")) # dropping as.character results in an error
up <- as.character(shiny::icon("circle-up"))
side <- as.character(shiny::icon("circle-right"))
dat <- data.frame(
    what=letters[1:15],
    value=rnorm(15)
) |> transform(
    direction=ifelse(abs(value)<0.1, side, ifelse(value<0, down, up))
) |> knitr::kable(format="html", escape=FALSE) |>
    kableExtra::kable_styling() # show in browser

型
但在本例中，不显示任何内容：

的
有什么想法如何与kable一起使用图标？

r

来源：https://stackoverflow.com/questions/76731854/how-to-use-icons-together-with-kable

1条答案

按热度按时间

mlmc2os51#

假设你正在渲染为html：

通过在文档中的任何位置包含隐藏的示例图标，强制shiny加载图标deps。

这里有一个reprex：

的数据

---
title: "Icons"
output: html_document
date: "2023-07-20"
---

```{r}
up <- shiny::icon(name = "circle-up") |>  as.character()
down <- shiny::icon(name = "circle-down") |> as.character()
side <- shiny::icon(name = "circle-right") |> as.character()
dat <- data.frame(
  what = letters[1:15],
  value = rnorm(15)
) |> 
  transform(
    direction = ifelse(abs(value) < 0.1, side, ifelse(value < 0, down, up))
  ) |> knitr::kable(format = "html", escape = FALSE) |>
  kableExtra::kable_styling() # show in browser
dat

shiny::icon("circle-up")

字符串

赞(0）回复(0）举报 2023-07-31

我来回答

R语言如何使用图标与可编辑

1条答案

相关问题

热门标签

最新问答

R语言 如何使用图标与可编辑

1条答案

相关问题

热门标签

最新问答

R语言如何使用图标与可编辑