Update genertest.R