if (!capabilities("tcltk")) {
  skip("Tcl/Tk not available; skipping all Tk-dependent tests in this file")
}

test_that("Test my ggplot.lmfit function: ",
          {
            expect_true(is.ggplot(ggplot.lmfit(1:10, 2:11)))
          })