added a test(). Returns a matrix with all data == TRUE if code is correct