Adding test functions to logisticRegression.R