[Help-glpk] problem reading parameters

[CHRISTINA CIGNARALE (RIT Student)]

Hi,

 

I wrote in recently about having trouble connecting GLPK and excel. I have downloaded the latest version of GLPK, restructured my model slightly and it is almost working except now I am getting the error :

 

G already provided with data

GLPK reads my first table for Pa, the patients admitted the day before and then has given me an error when I asked it read the Incoming patient table. They are different sets so I’m not sure why this is happening. My excel tables are set up as follows:

PA (or PN) G I c flag each in a column and saved as csv files.

 

I would appreciate any advice.

 

Thank you,

 

Christina Cignarale

4^th year Industrial and Systems Engineer

Rochester Institute of Technology

 

set PA;                                                                                   #the patients admitted the day before

set PN;                                                                                  #the incoming patients

set P := PA union PN;                                                      #set of all patients

set ISOLATION;                                                                                  #set of all types of isolation needs

set GENDER;                                                                       #set of Genders                                                                                                                                                            

set R ;                                                                                    #set of all available rooms

 

param B {j in R};

param G {i in P} in GENDER ;

param I {i in P} in ISOLATION;

param c {i in P} ;

param y {i in P, j in R} binary, default 0;

param flag {i in P} binary;

 

 

table pa IN "CSV" "pa.csv":PA <- [PA], G, I, c, flag;

 

table pn IN "CSV" "pn.csv":PN <- [PN], G, I, c, flag;

 

table iso IN "CSV" "iso.csv":ISOLATION <- [iso];

 

table gender IN "CSV" "gender.csv":GENDER <- [gender];

 

table rooms IN "CSV" "rooms.csv": R <- [R],B;

 

table yparam IN "CSV" "y.csv" : [P, R], y;

 

var x        {i in P, j in R} binary;

var delta {g in GENDER, j in R: B[j] <> 1} binary; 

var gamma {i in ISOLATION, j in R: B[j] <> 1} binary;

 

 

 

minimize PatientMoves: sum {i in PA, j in R} c[i]*(x[i,j]-y[i,j])- sum { i in PN,j in R:B[j] <> 0 and B[j] <> 99 and B[j] <>1 } c[i]*x[i,j];

 

subject to const1{i in P}: sum {j in R} x[i,j] =1;

   

 

subject to const2 {i in P, j in R: B[j] <> 0 and B[j] <> 99 and B[j] <>1}: x[i,j] <= delta[G[i],j];

 

subject to const3 {i in P, j in R: B[j] <> 0 and B[j] <> 99 and B[j] <>1}: x[i,j] <= gamma[I[i],j];

 

                                                                                               

subject to const4{j in R: B[j] <> 0 and B[j] <> 99 and B[j] <>1}: sum {g in GENDER} delta[g,j] <=1;      

 

subject to const5 {j in R: B[j] <> 0 and B[j] <> 99 and B[j] <>1}: sum {i in ISOLATION} gamma[i,j] <=1;

               

subject to const6 {j in R:B[j] <> 0 and B[j] <> 99 }: sum {i in P} x[i,j] <= B[j];                                           

 

subject to const7 {i in PA,j in R: B[j]=0}: x[i,j] = 0;

subject to const8 {i in PN,j in R: B[j]= 99 }: x[i,j] =0;

 

subject to const9 {i in P, j1 in R: B[j1]=1}:sum {j2 in R: B[j2] = 1 and j1 <>j2} x[i,j2]=0;

 

subject to const10 {i in P}: sum{j in R: B[j] <> 0 and B[j] <> 99} x[i,j] <= 1 - flag[i];

 

solve;

 

table results {i in P, j in R} OUT "CSV" "RGHresults.csv": i ~ P, j ~ R, x[i,j] ;

 

end;