Hi all, let's say I have:
lp = lpx_create_prob()
lpx_set_obj_dir(lp, LPX_MIN)
lpx_add_cols(lp, 3)
lpx_add_rows(lp, 2)
lpx_set_obj_coef(lp, 1, 100)
lpx_set_obj_coef(lp, 2, 200)
lpx_set_obj_coef(lp, 3, 300)
lpx_set_mat_row(lp, 1, 3, c(1, 2, 3), c(3, 2,1))
lpx_set_row_name(lp, 1, "c1")
lpx_set_row_bnds(lp, 1, LPX_LO, 100, 0)
print(lpx_get_mat_row(lp, 1))
lpx_write_cpxlp(lp, "hello")
> less hello
\* Problem: Unknown *\
Minimize
obj: + 100 x_1 + 200 x_2 + 300 x_3
Subject To
c1: + x_3 + 2 x_2 + 3 x_1 >= 100
Bounds
x_1 = 0
x_2 = 0
x_3 = 0
End
But if I do in R, print(lpx_get_mat_row(lp, 1))
$n
[1] 3
$ind
[1] 3 2
$val
[1] 1 2
Is there a reason why I'm missing the 1st index and its constraint value in
get_mat_row?
Thanks!
--
View this message in context:
http://www.nabble.com/GLPK-API-tf4098577.html#a11654799
Sent from the R help mailing list archive at Nabble.com.