R/myread.r

In bbydino/ISSA-ROCK-AND-ROLL: MATH 4753 - Applied Statistical Methods

#' Read a CSV File
#'
#' Given a csv file, reads the file from the current working directory. MATH 4753 Lab 2
#'
#' @param csv a csv file in the working directory to read in
#'
#' @importFrom utils read.table
#'
#' @export
myread <- function(csv) {
  dird = paste(getwd(), "/", sep = "")
  fl = paste(dird, csv, sep = "")
  read.table(fl, header = TRUE, sep = ",")
}