Shiny 闪亮：将反应值传递给renderTable中的xtable选项

我的表格格式有问题

假设我想用数字输入控制一个表的位数。表中的选项似乎是在启动应用程序时呈现的，但不是使用被动值。这是真的吗

---
title: "Untitled"
runtime: shiny
output: html_document
---


```{r, echo=FALSE}
inputPanel(
  numericInput("n_digits", label = "Number of digits:",
              min = 0, max = 5, value = 1)
)

renderTable({
a<-rep(1.1,3)
b<-rep(2.22,3)
c<-rep(3.333,3)
cbind(a,b,c)
}, digits=c(0,rep(input$n_digits,3)))
```

---
标题：“无标题”
运行时间：闪亮
输出：html\u文档
---
```{r，echo=FALSE}
输入面板(
数字输入（“n_位”，label=“位数：”，
最小值=0，最大值=5，值=1）
)
可渲染({
A.