Update histotest.R