Modify functions in banana/utils.R to improve the performance of the programe for high dimensional data.