[英]adding alt text tags to slickR carousel in R
我和同事正在 R-Markdown(基本,不是 blogdown,distillR 等)中建立一个网站,并使用 slickR package 创建了几个幻灯片轮播。 代码如下所示:
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 文本标签的方法,这样当您从一侧滑动到另一侧时,您会看到屏幕阅读器可以阅读的文本。 这可能吗? 如果有怎么办? 或者,还有其他方法可以使轮播变得可访问吗?
谢谢!
关注slickR 与 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)
声明:本站的技术帖子网页,遵循CC BY-SA 4.0协议,如果您需要转载,请注明本站网址或者原文地址。任何问题请咨询:yoyou2525@163.com.