When working throught the PRS vignette, an error is thrown in section 6.6.1

[timcadman]

Having run through the steps to assign the data, the following line:

ds.PRS(resources = resources, pgs_id = "PGS000660", 
       table = "phenotypes", table_id_column = "subject_id")

triggers this error:

$cohort1
[1] "Command 'PRSDS(resources = c(gds1_object, gds2_object, gds3_object, gds4_object, gds5_object, gds6_object, gds7_object, gds8_object, gds9_object, gds10_object, gds11_object, gds12_object, gds13_object, gds14_object, gds15_object, gds16_object, gds17_object, gds18_object, gds19_object, gds20_object, gds21_object), snp_threshold = 90, pgs_id = 'PGS000660', snp_assoc = FALSE)' failed on 'cohort1': Error while evaluating 'is.null(base::assign('prs_results', value={dsOmics::PRSDS(resources = dsBase::vectorDS(gds1_object, gds2_object, gds3_object, gds4_object, gds5_object, gds6_object, gds7_object, gds8_object, gds9_object, gds10_object, gds11_object, gds12_object, gds13_object, gds14_object, gds15_object, gds16_object, gds17_object, gds18_object, gds19_object, gds20_object, gds21_object), snp_threshold = 90, pgs_id = 'PGS000660', snp_assoc = FALSE)}))' -> Error in if (c(\"chr_name\", \"chr_position\") %in% colnames(scorings)) { : \n  the condition has length > 1\n"

(repeated for cohorts 2 & 3)