Closed liud4 closed 10 months ago
For your reference, here is the code I wrote to create the biospecimen availability data for VMAP data sharing portal.
merged.df.nl$plasma.availability <- merged.df.nl$serum.availability <- merged.df.nl$dna.availability <- merged.df.nl$paxgene.availability <- ifelse(!is.na(merged.df.nl$blood.complete)& (merged.df.nl$blood.complete == "1"), "Yes", "No") merged.df.nl$csf.availability <- ifelse(!is.na(merged.df.nl$csf.fluid) & (merged.df.nl$csf.fluid == "1"), "Yes", "No")
Resolved (process_biospecimen_availability.R).
https://github.com/liud4/rVMAP/blob/1e8aa09d639dcd810d04a8702fa163864245635a/R/process_biospecimen_availability.R#L1
Below is the Asana link for the derivation details.
https://app.asana.com/0/0/949492026778640/1205405098937435/f