x = nuclearPed() |>
addMarker(`2` = "1/2", name = "m1") |>
addMarker(`3` = "a/a", name = "m2")
getGenotypes(x)
### A list of pedigrees
s = transferMarkers(x, singleton("s"))
peds = list(x, s)
getGenotypes(peds)
# Using a function to select individuals
getGenotypes(x, ids = typedMembers)
Run the code above in your browser using DataLab