test_that("rare_multiplot", {
  
  expect_silent(rare_multiplot(hmp5, stat.by = 'Body Site'))
  
})