revise load.r