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)}
)
#> Warning generated by getFocalAnimalPed: simpleWarning in file(file, "rt"): cannot open file 'breeding file.csv': No such file or directory
#>  nprcgenekeepr
#> NULL