I want to know how I find the optimal values of my regression model for four factors?

Hello, I want to know how I find the optimal values ​​of my regression model for four factors?
the optimal value obtained must be greater than 0.5.What is the value of A, B, C and D that maximize the efficiency vector?I greatly appreciate your help

efficiency <- c(0.4153,0.4572,0.26,0.1446,0.0749,0.2778,0.294,0.4074,0.0912,0.2541,0.0855,0.444,0.0983,0.4263,0.0712,0.1286,0.2951,0.1389,0.128,0.3865,0.5113,0.5478,0.2631,0.4023,0.2962,0.2962,0.2962)
A<- c(340,340,320,300,340,320,340,340,340,320,320,300,300,340,300,340,320,340,300,300,300,320,300,300,320,320,320)
B<-c(200,120,200,120,200,160,160,120,120,160,160,200,120,200,200,120,120,200,200,200,120,160,160,120,160,160,160)
C<- c(80,60,70,60,80,60,70,80,80,80,70,80,80,60,80,60,70,60,60,60,60,70,70,80,70,70,70)
D<- c(0.2,0.2,0.4,0.6,0.6,0.4,0.4,0.2,0.6,0.4,0.6,0.2,0.6,0.2,0.6,0.6,0.4,0.6,0.6,0.2,0.2,0.2,0.4,0.2,0.4,0.4,0.4)

lm1 <- lm(cp~I(A)+I(B)+I(C)+I(D)+I(A^2)+I(B^2)+I(C^2)+I(D^2)+
(I(A)*I(B))+(I(A)*I(C))+(I(A)*I(D))+(I(B)*I(C))
+(I(B)*I(D))+(I(C)*I(D)))

A post was merged into an existing topic: Hello, I want to know how I find the optimal values of my regression model for four factors?

Please do not duplicate open topics