Homemade R function keeps returning argument is of length zero even when it isn't

Question

I\'m trying to create a stochastic gradient descent function in R and every time I try to use it, R keeps saying "Error in if (length(MSE_new - MSE) > 0 & abs(MSE_ne