test_that("plsda works", {
  expect_error(
  plsda(XRVIP2,
      Yotu)
  )

})