Part of Genetic Value Analysis
Adds a column to rpt
containing integers from 1 to nrow, and provides
a value designation for each animal of "high value" or "low value"
Examples
library(nprcgenekeepr)
finalRpt <- nprcgenekeepr::finalRpt
rpt <- rankSubjects(nprcgenekeepr::finalRpt)
rpt[["highGu"]][1, "value"]
#> [1] "High Value"
rpt[["highGu"]][1, "rank"]
#> [1] 1
rpt[["lowMk"]][1, "value"]
#> [1] "High Value"
rpt[["lowMk"]][1, "rank"]
#> [1] 122
rpt[["lowVal"]][1, "value"]
#> [1] "Low Value"
rpt[["lowVal"]][1, "rank"]
#> [1] 190