nom <- nomogram(fit=svm$call, fun=function(x) 1/(1+exp(-x))) Error in lims[[i]] : subscript out of bounds

这个错误提示表明在运行 `nomogram` 函数时，出现了 `subscript out of bounds` 的错误，即下标超出了数组边界。这个错误通常是由于参数设置有误导致的。

在这个代码中，`fit` 参数应该传入已经训练好的 SVM 模型，而不是 SVM 模型的调用语句。因此，你需要将 `svm$call` 改为已经训练好的 SVM 模型对象，例如 `svm_model`。另外，`fun` 参数是用于计算类别概率的转换函数，但是 SVM 模型并不直接输出类别概率，因此可以不传入 `fun` 参数或者使用默认的转换函数。修改后的代码如下所示：

nom <- nomogram(fit = svm_model)

其中，`svm_model` 是已经训练好的 SVM 模型对象。