Get pedigree based on list of focal animals

Get pedigree based on list of focal animals

Usage

getFocalAnimalPed(fileName, sep = ",")

Arguments

fileName

character vector of temporary file path.

sep

column separator in CSV file

Value

A pedigree file compatible with others in this package.

Examples

library(nprcgenekeepr)
siteInfo <- getSiteInfo(FALSE)
source <- " generated by getFocalAnimalPed: "
tryCatch(getFocalAnimalPed(fileName = "breeding file.csv"),
  warning = function(wCond) {
    cat(paste0("Warning", source, wCond),
      name = "nprcgenekeepr"
    )
    return(NULL)
  },
  error = function(eCond) {
    cat(paste0("Error", source, eCond),
      name = "nprcgenekeepr"
    )
    return(NULL)
  }
)
#> Error generated by getFocalAnimalPed: Error in file(file, "rt"): cannot open the connection
#>  nprcgenekeepr
#> NULL