# \donttest{
# Built-in dataset `paternity`
peds = paternity
map = LINKAGEMAP
mdata = markerSummary(peds)
# Result table
LRtab = linkedLR(pedigrees = peds, linkageMap = map, markerData = mdata)
# Write to excel
tmp = paste0(tempfile(), ".xlsx")
writeResult(LRtab,
pedigrees = peds,
linkageMap = map,
markerData = mdata,
outfile = tmp)
# openxlsx::openXL(tmp)
# }
Run the code above in your browser using DataLab