如何使用tags（）将变量作为属性传递？

Question

我正在尝试使用自定义UI，我想传递此输出

server.R

output$myVar <- 10

作为属性的值（myVar是被动的）

ui.R

htmlTemplate("index.html",
myVar=tags$div('data-transitiongoal'=myVar))

然后以经典方式从index.html调用

的index.html

{{myVar}}

部署应用程序时出现此错误：

  

错误：未找到对象'progressBarPartTimePerc1'

但是，我替换像'data-transitiongoal'="20"这样的数值，该应用程序运行正常。

任何想法如何解决？

Answer 1

尝试：   myVar = tags $ div（'data-transitiongoal'= as.character（myVar）））