Update perceptron.R