Create my.quadprog.R