在 R 中将 alt 文本标签添加到 slickR 轮播答案

【问题标题】：adding alt text tags to slickR carousel in R在 R 中将 alt 文本标签添加到 slickR 轮播
【发布时间】：2021-02-08 20:54:29
【问题描述】：

我和同事正在 R-Markdown 中构建一个网站（基本，而不是 blogdown、distillR 等），并使用 slickR 包创建了几个幻灯片轮播。代码如下：

library(slickR)

images <- c("Slide1.JPG", "Slide2.JPG", "Slide3.JPG", "Slide4.JPG", "Slide5.JPG")
test <- slickR(obj = images, height=350, width='100%') 
test

我在 Google 上四处搜索，但找不到添加 alt 文本标签的方法，这样当您从一侧滑动到另一侧时，您会看到屏幕阅读器可以阅读的文本。这可能吗？如果有怎么办？或者，是否有其他方法可以使轮播可访问？

谢谢！

【问题讨论】：

标签： r r-markdown slickr

【解决方案1】：

slickR with DOMS 的以下小插曲

library(slickR)

images <- c("Slide1.JPG", "Slide2.JPG", "Slide3.JPG", "Slide4.JPG", "Slide5.JPG")
imgs_bare <- mapply(function(x,txt){
  htmltools::tags$img(src = x, title = txt)
},x = nba_player_logo$uri[c(1:5)],txt = images,SIMPLIFY = FALSE)
slickR(obj = imgs_bare, height=350)

【讨论】：

谢谢你！超级有帮助。当我的图像在线存储并且有一个用于 x 的 URL 向量时，我能够让它工作。我没有把所有这些放在一起，非常感谢你的工作。