R/import_tab.R

In achafetz/adjuST: Adjust Site Tool Targets

#' Import sheet from site tool
#'
#' @param path full filepath for the site tool
#' @param sheetname sheet name in the site tool
#'
#' @export

import_tab <- function(path, sheetname){

  #import sheet from site tool
  df <- readxl::read_excel(path,
                           sheet = sheetname,
                           skip = 4)

  return(df)

}