Logistic Regression with gradient Ascent R

Need help with project implementing logistic regression with gradient ascent in R.
Following steps should be commented accordingly:
. Normalize the feature variable x1 (see the Nota-Bene below).
• Calculate the value of the objective function ‘(β0; β1).
• Choose a value of the learning rate η (you should try different values).
• Initialize the parameter value and calculate the gradient r‘(β0; β1).
• Update the parameter value.
• Check whether gradient ascent has converged.
• Complete the implementation of gradient ascent.
• Predict the labels for a set of test examples.