Update fista.R

lambda2= lambda2 * nobs