R/read_in_WebOfKnowledge_export.R

Defines functions read_in_WebOfKnowledge_export

Documented in read_in_WebOfKnowledge_export

read_in_WebOfKnowledge_export <-
  function(fileName = "savedrecs.txt",
           seperator = "\t",
           generate_PaperNo_Row = TRUE) {
    WoK_extracted = read.csv(
      fileName,
      header = TRUE,
      sep = seperator,
      encoding = "utf-8",
      na.strings = "",
      skipNul = TRUE,
      row.names = NULL,
      nrows = 0,
      quote = "",
      fill = FALSE
    )
    if (generate_PaperNo_Row) {
       WoK_extracted$Papern.No = seq.int(nrow(WoK_extracted))
    }
    return(WoK_extracted)
  }
mfinst/TM-CoCit-Support-FM documentation built on March 4, 2020, 8:38 p.m.