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 May 23 08:01:24 CEST 2024.