1 Sample Information

Below shows the full sample information:

Code

library(DT)
dt.samples<-fread("static/R/data/dt.samples.csv")
DT::datatable(dt.samples)

Table 1.1: Sample used in this study

Pleae note that:

GS-B-374-UW is data from the same plasma sample as GS-B-374-UW-b. Both failed QC
GS-59-CX is data from the same plasma sample as GS-59-CX-b. Both failed QC
GS-179-HQ is data from the same plasma sample as GS-179-HQ-b. Only GS-179-HQ-b passed QC

1.1 Discovery Cohort (preterm dataset)

Listing 1.1: Tabulate the discovery dataset

xtabs(~GA+Condition, dt.samples[Cohort=="preterm"]) %>% addmargins

      Condition
GA     Case Control Sum
  12wk   15      60  75
  20wk   14      60  74
  28wk   13      60  73
  36wk    1      56  57
  Sum    43     236 279

1.2 Validation Cohort (term dataset)

Listing 1.2: Tabulate the validation dataset

xtabs(~GA+Condition, dt.samples[Cohort=="term"]) %>% addmargins

      Condition
GA     Case Control Sum
  12wk   24      96 120
  20wk   22      96 118
  28wk   24      97 121
  36wk   21      96 117
  Sum    91     385 476