Finished R scripts, started writing output tests