## ----setup, include = FALSE---------------------------------------------------
knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>"
)

## ----eval=FALSE---------------------------------------------------------------
# library(earthUI)
# launch()

## ----eval=FALSE---------------------------------------------------------------
# demo_file <- system.file("extdata", "Appraisal_1.csv", package = "earthUI")
# df <- import_data(demo_file)