library(testthat) library(ggplate) test_check("ggplate")