expect_snapshot for UI functions

• Use expect_snapshot() to capture the output displayed on the console.

test_that("sliderInput01() creates expected HTML", {
  expect_snapshot(sliderInput01("x"))
})