隔墙外壳模型示意图（三维视图）%e A182743阵型开首：
%e A182743 3 3,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2，；%e A182743 3,3,3,3,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,，2，
%e A182743 6,3,2,2,2,2,2,2，
%e A182743 5,4,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,e A182743 5,3,3,2,2,2,2,2,2，
%e A182743 4,4,3,2,2,2,2,2,2，
%e A182743 8,3，2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2，；第二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、二、2，2，；%p A182743 cmpL：=proc（a，b）locali；为i从1到min（nops（a，a，nops（b））do if op（i，a）<op（i，b）然后返回-1；elif op（i，a）>op（i，b）然后返回1；end if；end if；end do；如果nops（a）>nops（b）b）则返回1；elif nops（a）<nops（b）则返回1；elif nops（a）<nops（b）然后返回-1；其他返回0；end if；end proc：；%p A182743 pShellMin：=proc（p）locallocallocallocal proc（p）local p）local proc（p）local proc（p）p）localIdx，j；idx:=1；对于从2开始的jnops（p）做如果cmpL（op（j，p），op（idx，p））<0，那么idx：=j；end if；end do；返回idx；end proc；end proc：
%p A182743 A141412853A141285 ROWF：=proc（n）局部p；如果n<=1，则[n]；else psort：=[]；p：=结合[分区]（n）；而nops（p）>0做m：=pShellMin（p）；mmi：=min（p）；mmi：=min（op（op（m，p））））；如果mmi>1，mma：=max（op（op（m，m，p））；如果mmi>1，mma：=max（op（op（p））；psort：=[op（psort），sort（op（m，p），`>`）；；end if；p：=SUBSP（m=NULL，p）；end do:psort；end if；end proc：
%p A182743为n从1到17的1到17的2办办办shl：=A141285 rowf（n）；为r在shl中为k做k中r做printf（“%d，”，k）；end do:printf（“\n“）；end do:printf（“\n“）；end do:printf（\n“）；end do：#利用r.J.J.Mathar 2009年12月3 2010年3 2010年；%Y A182743的A135010，A135010，A135010 38121，A141285，A182731，A182742.
%Y A182743第1列给出A182733。第2列给出A182745.
%K A182743 nonn，Table，more
%O A182743 1,1
%A A182743
%O Omar E.Pol
，2010年11月30日，2010年12月1日
%K A182743 Non，tabl，more
%O A182743 1,1