R/get_basic_data.R

Defines functions get_basic_data

get_basic_data <- function(xmls_list) {
  paper <- tibble::as_tibble(as.list(xmls_list$`DADOS-GERAIS`$.attrs))
  paper <- dplyr::bind_cols(paper, as.list(xmls_list$.attrs))
  return(paper)
}
BrunoVilela/NUPEX documentation built on April 15, 2021, 12:47 p.m.