We will use the
logisticRidge function here from the
ridge package to fit the ridge regression, and check if we can obtain more significant variables.
logisticRidgefunction to obtain
GC_RLR, a small manipulation required here, by using the following line of code:
GC_RLR<-logisticRidge(as.numeric(good_bad)-1~.,data= as.data.frame(GC), lambda = "automatic")
The detailed summary output is given in the following screenshot: