tests/testthat/test-check_protein_sequences_length.R

In richelbilderbeek/bbbq: The Bilderbeek Bianchi and Bogaart Question

test_that("use", {
  expect_silent(
    check_protein_sequences_length(
      protein_sequences = "FANTASTICALLYFAMILYVW",
      peptide_length = 13
    )
  )
  expect_error(
    check_protein_sequences_length(
      protein_sequences = "ILL",
      peptide_length = 13
    )
  )

})