Create medfasp.R