R - Shiny中的单选按钮不再起作用

Question

他们曾经使用旧版闪亮版（2014年左右）。现在我在屏幕上弄得一团糟。控制台也抱怨输入为0.图表不再打印（希望与无线电有关）。他们使用的计算仍然有效：

    <div id="yaxis" class="form-group shiny-input-radiogroup shiny-input-container"> 
<label class="control-label" for="yaxis">y-axis bounds</label> <div class="shiny-options-group"> 
<div class="radio"> <label> <input type="radio" name="yaxis" value="variable" checked="checked"/> 
<span>Variable</span> </label> </div> <div class="radio"> <label> <input type="radio" name="yaxis" value="default"/> 
<span>Preset</span> </label> </div> </div> </div>


This is what it looks like:
    fluidRow(
       column(3,        
        helpText("Hello!"
        ),  
        tags$div(title="Stock price for output is the midpoint of the slider: 'Stock price visible range'.", 
           tableOutput("outputs")
        ),

        tags$div(title="Select how the y-axis should behave.",
        gsub("label class=\"radio\"", "label class=\"radio inline\"",radioButtons("yaxis", "y-axis bounds", 
             list("Variable" = "variable", "Preset" = "default" ))
        ))
))

谢谢！