test/c212.1a.interim/initial_values/check_test.r

In rcarragh/c212: Methods for Detecting Safety Signals in Clinical Trials Using Body-Systems (System Organ Classes)

library(tools)

rc = Rdiff("baseline/conv.dat", "test/conv.dat")
if (rc != 0) { stop("Error");  }

rc = Rdiff("baseline/summary.dat", "test/summary.dat")
if (rc != 0) { stop("Error");  }

rc = Rdiff("baseline/ptheta.dat", "test/ptheta.dat")
if (rc != 0) { stop("Error");  }

rc = Rdiff("baseline/ptheta95.dat", "test/ptheta95.dat")
if (rc != 0) { stop("Error");  }

rc = Rdiff("baseline/RAISED_AES", "test/RAISED_AES")
if (rc != 0) { stop("Error");  }