tests/testthat/test_simple.R

svm <- survivalsvm(Surv(time, status) ~ ., veteran, gamma.mu = 0.1)

test_that("survival svm returns class survivalsvm", {
  expect_is(svm, "survivalsvm")
})
imbs-hl/survivalsvm documentation built on May 20, 2019, 11:13 a.m.