Input 有光泽的输入输出文本

Input 有光泽的输入输出文本,input,output,shiny,Input,Output,Shiny,我的密码里有这个 server: output$print_amount <- renderText({"1000"}) ui: column(3, uiOutput("print_amount", label = "", value = 0)) 服务器: 输出$print\u数量我找到了答案: 服务器 updateNumericInput(session, "print_amount", value = 1000) 用户界面 column(3, numericInput("pr

我的密码里有这个

server:
output$print_amount <- renderText({"1000"}) 

ui:
 column(3, uiOutput("print_amount", label = "", value = 0))
服务器:
输出$print\u数量我找到了答案:

服务器

updateNumericInput(session, "print_amount", value = 1000)
用户界面

column(3, numericInput("print_amount", label = "", value = 0)),