求问lingo三维派生集赋值问题！求大神指教啊！

我想实现对p(i,j,1)和p(i,j,2)单独赋值（读取excel二维数据表）。
model:
sets:
node/1..3/ !路网交叉口为节点;
od/1..2/:Yr;!OD对集，OD对数R，0-1变量Yr表示OD对r是否被覆盖;
pair(node,node,od):p;
link(node,node):x;
endsets
data:
@for(pair:p(i,j,1)=1 0 0 1 0 0 0 0 0);
@for(pair:p(i,j,2)=1 0 0 1 0 0 0 0 0);
!p(i,j,1)=1 0 0
1 0 0
0 0 0;
!p(i,j,2)=1 0 0
1 0 0
0 0 0;
x=1 0 0
0 0 0
0 0 0;
enddata
以上两种方法赋值p(i,j,1)都不行啊！怎么实现啊？求问大神啊！
论文急用啊！知道的麻烦指教下，不甚感激！