context("sanitize") test_that("sanitize-functions", { s <- c("a<b", "b>c", "a&o", "abc") r <- c("a<b", "b>c", "a&o", "abc") expect_identical(MALDIquantForeign:::.sanitize(s), r) })
Generated by dwww version 1.15 on Thu Jun 20 20:20:38 CEST 2024.