一种方法是使用 py_run_string() 命令在 R 中运行 Python 代码.我使用多个字符串分解了代码以显示步骤.

One way would be to run the Python code in R using the py_run_string() command. I have broken up the code using multiple strings to show the steps.

Sys.setenv(RETICULATE_PYTHON = "set the path for python")

library(reticulate)
#Load the package 
str1 = " 
from gekko import GEKKO
m = GEKKO()"

py_run_string(str1)

#Assign values with lower and upper bound along with equations
str2 = "
x1 = m.Var(value=1, lb=1, ub=5)
x2 = m.Var(value=5, lb=1, ub=5)
x3 = m.Var(value=5, lb=1, ub=5)
x4 = m.Var(value=1, lb=1, ub=5)

m.Equation(x1 + x2 == 7)
m.Equation(x1 * x2 * x3 * x4 >= 25)
m.Obj(x1 * x4 * (x1 + x2 + x3) + x3)
m.solve(disp=True)"

py_run_string(str2)

#Print the results
str3="
print('')
print('Results')
print('x1: ' + str(x1.value))
print('x2: ' + str(x2.value))
print('x3: ' + str(x3.value))
print('x4: ' + str(x4.value))
"
py_run_string(str3)

#To access an object
py$x1$VALUE