Create wharton_load.R