将 alt 文本标签添加到 R 中的 slickR carousel

如何解决将 alt 文本标签添加到 R 中的 slickR carousel

我和同事正在用 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

我在谷歌上搜索过，但找不到添加替代文本标签的方法，这样当你左右滑动时，你会得到屏幕阅读器可以阅读的文本。这可能吗？如果是这样怎么办？或者，是否有其他方法可以让轮播变得可访问？

谢谢！

解决方法

关注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)