使用R中的提交按钮时出现问题

我试图做一个闪亮的仪表板来展示SWM是如何工作的

以下是一个片段：

我想有一个询问SVM超参数的框，当我按下submit按钮时，SVM执行。 但是我不知道如何制作这个提交按钮。目前，只要我更改一个超参数，SVM就会立即执行

有人知道如何确保仪表板在用户选择每个超参数并按下submit按钮后再执行SVM吗

我的身体。R代码：

tabItem(
tabName=“svm”，
fluidRow（
框（title=“Spécification du SVM”，
status=“primary”，
solidHeader=TRUE，
height=“420px”，
宽度=12，
选择输入（“内核”，
“选择内核类型：”，
选择=c（线性=“线性”，多项式=“多项式”，径向=“径向”），
已选择=“线性”），
#仅当内核是线性的时才显示此面板
条件板(
condition=“input.kernel==“linear”，
选择输入（“classweights”，“您想输入类权重吗？”：”，选择=c（“是的，请”，“不，谢谢”），选择=“不，谢谢”），
选择输入（“交叉”，“多少个k倍？”，选择=c（1,3,5），选择=3）
),
#仅当内核是多项式时才显示此面板
条件板(
condition=“input.kernel=”多项式“，
选择输入（“多边形”，“多少度：”，选择=c（3,4,5），选择=3），
选择输入（“classweights”，“您想输入类权重吗？”：”，选择=c（“是的，请”，“不，谢谢”），选择=“不，谢谢”），
pickerInput（“交叉”，“多少k折叠？：”，选项=c（1,3,5），选择=3）
),
#仅当内核是多项式时才显示此面板
条件板(
condition=“input.kernel==“radial”，
选择输入（“classweights”，“您想输入类权重吗？”：”，选择=c（“是的，请”，“不，谢谢”），选择=“不，谢谢”），
pickerInput（“交叉”，“多少k折叠？：”，选项=c（1,3,5），选择=3）
),
动作按钮（“开始”，“运行”，图标（“纸飞机”），
style=“color:#fff；背景色：#337ab7；边框颜色：#2e6da4”））
),
fluidRow(
框（title=“Spécification du SVM”，
status=“primary”，
solidHeader=TRUE，
height=“420px”，
宽度=12，
逐字输出（svm）
)

和我的服务器.R代码：

---

output$svm要使此示例可复制，请包含所使用的库，例如
library（shinny）
和完整的
ui
包括类似
ui的内容不幸的是，您的示例不可复制。请参阅“模式2-延迟反应”以获取示例。为了使此示例具有可复制性，能否请您包括所使用的库，例如
library（shinny）
和完整
ui
包括类似
ui的内容不幸的是，您的示例不具有可复制性。有关示例，请参见“模式2-延迟反应”。