diff --git a/R/svm_linear_data.R b/R/svm_linear_data.R index ed2d6da95..36543bdae 100644 --- a/R/svm_linear_data.R +++ b/R/svm_linear_data.R @@ -172,7 +172,7 @@ set_fit( data = c(formula = "x", data = "data"), protect = c("x", "data"), func = c(pkg = "kernlab", fun = "ksvm"), - defaults = list(kernel = "vanilladot") + defaults = list(kernel = "vanilladot", kpar = list()) ) ) @@ -185,7 +185,7 @@ set_fit( data = c(formula = "x", data = "data"), protect = c("x", "data"), func = c(pkg = "kernlab", fun = "ksvm"), - defaults = list(kernel = "vanilladot") + defaults = list(kernel = "vanilladot", kpar = list()) ) ) diff --git a/tests/testthat/_snaps/translate.md b/tests/testthat/_snaps/translate.md index 0517a3341..7c3678510 100644 --- a/tests/testthat/_snaps/translate.md +++ b/tests/testthat/_snaps/translate.md @@ -1966,6 +1966,9 @@ $kernel [1] "vanilladot" + $kpar + list() + --- @@ -1986,6 +1989,9 @@ $kernel [1] "vanilladot" + $kpar + list() + # arguments (svm_poly)