资源

树枝和束缚树(netdre18)

/****************************************************************//*S A S S A M P L E L I B R A R Y*//*                                                              *//*姓名:NETDRE18*//*标题:树枝和束缚树(netdre18)*//*产品:或*//*系统:所有*//*关键:NETDRAW*//*程序:格式,NETDRAW*//*数据:*//*                                                              *//*支持:更新:*//*参考:NETDRAW章节中的示例18(PM用户指南)*//*公共域IP程序,STEIN9*//*其他:*//*                                                              *//****************************************************************//***从PROC LP获得的迭代日志钢结构9--lp3rw149.sas1 0激活4 0005 0.667 2 2。2-1激活4 0002 0.667 2 3。3 2激活4 0004 0.667 2 4。4-3激活4.333333 0007 0.667 1.66667 5。5 4次优5。2         16.3英寻4.3333333。1         17 1激活4 0008 0.333 2 2 18-7激活4 0007 0.667 2 3 19-8 FATHOMED 4.333333。2         110 8 FATHOMED 4.333333。1         111 7激活4 0007 0.667 2 2 112-11 FATHOMED 4.333333。1         113 11最终成型4.5。0         .*****/数据网;输入节点问题cond$10。对象;如果cond=“ACTIVE”,则_pattern=1;否则,如果cond=“SUBTIMIAL”,则_pattern=2;其他模式=3;数据线;1 0激活42-1激活43 2激活44-3激活4.3333335 4次优56 3最后修整4.3333337 1激活48-7激活49-8最后修整4.33333310 8最后修整4.33333311 7激活412-11最后修整4.33333313 11最后修整4.5;/*设置优先级关系使用儿童信息*/数据逻辑;保持节点成功;设置网络(firstobs=2);succ=节点;节点=abs(问题);运行;proc排序数据=逻辑;按节点;运行;/*合并逻辑数据和节点数据*//*设置ID值*/数据bbtree;长度id$9;合并逻辑网;按节点;如果节点<10,则id=put(节点,1.)| put(对象,f8.2);else id=put(node,2.)| | put(object,f7.2);运行;goptions border rotate=纵向;pattern1 v=s c=绿色;模式2 v=s c=红色;pattern3v=s c=蓝色;title h=3 j=c‘树枝和束缚树’;标题2“”;footnote1 h=1.5 j=c c=红色“最佳”c=绿色“激活”c=蓝色“Fathomed”;脚注2“;footnote3 h=1.5“节点显示迭代次数和目标值”;proc netdraw data=bbtree graphics out=bbout;actnet/activity=节点继任者=成功id=(id)有节点的诺拉贝尔ctext=白色coutline=黑色carcs=黑色x介于=15之间ybetween=3压缩font=瑞士直线的旋转旋转文本箭头=0htext=2;运行;数据网素;设置bbout;如果_seq=0;下降(_seq_);_x=来自;id=子(id,3);运行;goptions旋转=横向;title h=3‘树枝和束缚树’;title2 h=2“按迭代数对齐”;footnote1 h=1.5 j=c c=红色“最佳”c=绿色“激活”c=蓝色“Fathomed”;脚注2“;footnote3 j=l h=1.5“节点显示目标值”;pattern1 v=e c=绿色;模式2 v=e c=红色;图案3 v=e c=蓝色;proc-netdraw data=netin图形;actnet/id=(id)ctext=黑色carcs=黑色align=来自_框架pcompress(压缩)直线的箭头=0有节点的诺拉贝尔htext=2.5xbetween=8;运行;