Accuracy improvement for logistic regression model I have achieved 68% accuracy with my logistic regression model. I want to increase the accuracy of the model. How can I apply stepwise regression in this code and how beneficial it would be for my model? What changes shall I make in my code to get more accuracy with my data set. I have attached my dataset below. Following is my code:

library(dplyr)
data1 &lt;- read.csv("~/hj.csv", header=T)
train&lt;- data1[1:116,]
VALUE&lt;-as.numeric(rownames(train))
testset&lt;- data1[1:116,]
mylogit &lt;- glm(VALUE ~ POINT1 + POINT2 + POINT3 + POINT4 , data = data1, family ="binomial")
testset$predicted.value = predict(mylogit, newdata = testset, type="response")
for (i in 1: nrow(testset)){
  if(testset$predicted.value[i] &lt;= 0.50)
    testset$outcome[i] &lt;- 0 
  else testset$outcome[i] &lt;- 1
}
print(testset)
tab = table(testset$VALUE, testset$outcome) %&gt;% as.matrix.data.frame()
accuracy = sum(diag(tab))/sum(tab)
print(accuracy)
print(tab)
table(testset$VALUE, testset$outcome)




Following is my dataset:
Link 1: http://www.filedropper.com/hj_2
Try:


  mylogit &lt;- glm(VALUE ~ POINT1 * POINT2 * POINT3 * POINT4, data = data1, family ="binomial")


with about 72% accuracy.