R/adiCon.R

In YoJimboDurant/rHamr: Imports .adif format ham radio log books into R and produces graphs

#' @title adiCon
#' @description Function used to deparse a line of ADIF 2 called by readAdi.
#' @export
adiCon <- function(adiLine){ 
  adiData <- str_match_all(adiLine, ">(.*?)<")
  
  adiHeader <- str_match_all(adiLine, "<(.*?)>")
  
  dfx <- data.frame(t(adiData[[1]][,2]))
  nameCols <- adiHeader[[1]][,2]
  nameCols <- gsub(":.*", "", nameCols)
  names(dfx) <- nameCols[nameCols != "EOR"]
  dfx
}