私はRを初めて使用するので、これはばかげた質問かもしれませんが、kernlabのksvm関数で可能なすべてのカーネルオプションを反復処理し、結果の表を吐き出す方法を探しています.
今、私は基本的なセットアップをしています：
# call ksvm
model <- ksvm(as.matrix(data[,1:10]),as.factor(data[,11]),type="C-svc",kernel="vanilladot",C=100,scaled=TRUE)
# calculate a1.am
a <- colSums(model@xmatrix[[1]] * model@coef[[1]])
a
# calculate a0
a0 <- -model@b
a0
# see what the model predicts
pred <- predict(model,data[,1:10])
pred
# see what fraction of the model's predictions match the actual classification
sum(pred == data[,11]) / nrow(data)
そして、すべての予測と精度指標を吐き出します
[1] 0.8639144
理想的には、このようなテーブルが必要です
kernel accuracy
vanilladot 0.8639144
polydot 0.7285432
besseldot 1
... ...
それを行うための迅速で簡単な方法はありますか、またはモデル名と精度メトリックを使用して手動でテーブルを作成し、それを印刷またはプロットする唯一の方法はありますか?