我有一个带有活动按钮的表单,问题是我想重置此表单中的按钮output$exampleFasta = 0
但它抛出异常,我怎样才能更改变量的数据?或者如果存在诸如 renderImage 之类的东西,可以为特定属性(如 id)提供信息。
索引.html
<form class="span12 menu-med-upload">
<div class="row-fluid">
<h3>Upload File .fasta</h3>
<div class="custom-input-file btn btn-inverse">
<input type="file" size="1" name="fileFasta" id="fileFasta" class="input-file" />
Select File
</div>
<img src="/static/img/check.png" class = "custom-input-check">
<div class="span12"></div>
<textarea class = "span12" rows = "10" style="resize: none;" id="textAreaFasta">
</textarea>
</div>
<button id="uploadFasta" type="button" class="btn btn-inverse action-button" >Upload File</button>
<button id="exampleFasta" type="button" class="btn btn-inverse action-button" >Example</button>
</form>
服务器.R
output$table <- renderText({
if(input$exampleFasta != 0 && input$uploadFasta == 0){
return(myRenderTable(matrixProteinExample(),"table",""))
}
if(input$uploadFasta != 0){
return(myRenderTable(matrixProtein(),"table",nameFile))
}
})
用这样的东西改变。但这是错误的。
output$table <- renderText({
if(input$exampleFasta != 0 && input$uploadFasta == 0){
output$exampleFasta <- 0
return(myRenderTable(matrixProteinExample(),"table",""))
}
if(input$uploadFasta != 0){
return(myRenderTable(matrixProtein(),"table",nameFile))
}
})