Exercise 4.4 bug
Closed this issue · 1 comments
amstilp commented
This code isn't working properly:
pedfile <- "sample_annotation.RData"
if (!file.exists(pedfile)) download.file(file.path(workshop.path, pedfile), pedfile)
ped <- TopmedPipeline::getobj("pedigree.RData")
head(ped)
I think pedfile should be "pedigree.RData" instead of "sample_annotation.RData".