Added test script to check FishModel.R