Update bfast.R