A data frame with 1159 rows and 15 variables


A dataset with variables as follows:

  • RID N Participant roster ID

  • SITEID N Site ID

  • VISCODE T Visit code

  • USERDATE S Date record created

  • APTESTDT D Date Test Performed

  • APGEN1 N Genotype - Allele 1

  • APGEN2 N Genotype - Allele 2

  • APVOLUME N Volume of Blood Shipped in Lavendar Top Tube

  • APRECEIVE N Sample recieved within 24 hours of blood draw?

  • APAMBTEMP N Sample shipped at ambient temperature?

  • APRESAMP N Request Resample?

  • APUSABLE N Sample Useable?

  • USERDATE2 S Date record last updated


apoeres$ApoE4 <- apply(apoeres[, c('APGEN1', 'APGEN2')]==4, 1, sum)>=1