Update fista.R