213126_zh-CN

liliconcom

JMP 脚本编写 - 双 FOR 循环：H 列表框和 V 列表框

大家好，

我开始学习脚本编写，并尝试制作一个带有 6 个散点图的窗口：2 个垂直 + 3 个水平。

我尝试过双 for 循环，但我不知道为什么它不起作用。 它没有给出错误，但我无法获取图像。代码是：

BladeList = List( "Blade8", "Blade61", "Blade74" );

New Window( "Oneway Advisor",
 H List Box(
  For( j = 1, j <= 2, j++,
   V List Box(
    For( i = 1, i <= 3, i++,
     Write(i);
     Scatterplot 3D(
      Y( :Name( " x" ), :y, :z ),
      Coloring( :Name( " Mean Io" ) ),
      Legend( 1522 ),
      Frame3D(
       Legend( 1 ),
       Set Grab Handles( 0 ),
       Set Rotation( -64, 0, -41 ),
       Set Marker Scale( 5.2652 )
      ),
      Where( :Blade == BladeList[i] & :Embodiment == "THP" ),
      SendToReport(
       Dispatch(
        {},
        "100",
        ScaleBox,
        {Legend Model(
         1522,
         Properties(
          0,
          {gradient( {Color Theme( "Jet" )} )},
          Item ID( " Mean Io", 1 )
         )
        )}
       )
      )
     )
    );
   ),
  );
 );
);

但是，如果我尝试单个循环，它会起作用：

BladeList = List( "Blade8", "Blade61", "Blade74" );

New Window( "Oneway Advisor",
 H List Box(
  /*For( j = 1, j <= 2, j++,*/
   V List Box(
    For( i = 1, i <= 3, i++,
     Write(i);
     Scatterplot 3D(
      Y( :Name( " x" ), :y, :z ),
      Coloring( :Name( " Mean Io" ) ),
      Legend( 1522 ),
      Frame3D(
       Legend( 1 ),
       Set Grab Handles( 0 ),
       Set Rotation( -64, 0, -41 ),
       Set Marker Scale( 5.2652 )
      ),
      Where( :Blade == BladeList[i] & :Embodiment == "THP" ),
      SendToReport(
       Dispatch(
        {},
        "100",
        ScaleBox,
        {Legend Model(
         1522,
         Properties(
          0,
          {gradient( {Color Theme( "Jet" )} )},
          Item ID( " Mean Io", 1 )
         )
        )}
       )
      )
     )
    );
   ),
      V List Box(
    For( i = 1, i <= 3, i++,
     Write(i);
     Scatterplot 3D(
      Y( :Name( " x" ), :y, :z ),
      Coloring( :Name( " Mean Io" ) ),
      Legend( 1522 ),
      Frame3D(
       Legend( 1 ),
       Set Grab Handles( 0 ),
       Set Rotation( -64, 0, -41 ),
       Set Marker Scale( 5.2652 )
      ),
      Where( :Blade == BladeList[i] & :Embodiment == "THP" ),
      SendToReport(
       Dispatch(
        {},
        "100",
        ScaleBox,
        {Legend Model(
         1522,
         Properties(
          0,
          {gradient( {Color Theme( "Jet" )} )},
          Item ID( " Mean Io", 1 )
         )
        )}
       )
      )
     )
    );
   ),
  /*);*/
 );
);

谁能帮我这个。

谢谢你，

大卫

 

回复：JMP 脚本编写 - 双 FOR 循环：H 列表框和 V 列表框

我知道这是一个有点旧的线程，但我无法说出修复嵌套循环问题的两组代码之间的根本变化是什么。 我在使用嵌套循环的工具之一中遇到错误，我希望它是相关的。

 

编辑：这只是使用 HLB 附加功能的问题吗？

回复：JMP 脚本编写 - 双 FOR 循环：H 列表框和 V 列表框非常感谢 txnelson 的帮助！ 它工作完美。回复：JMP 脚本编写 - 双 FOR 循环：H 列表框和 V 列表框

我无法让双循环工作，但是，下面的方法将为您提供您想要的结果

BladeList = List( "Blade8", "Blade61", "Blade74" );

New Window( "Oneway Advisor",
 hlb = H List Box()
);
For( j = 1, j <= 2, j++,
 vlb = V List Box(
  For( i = 1, i <= 3, i++,
   sc = Scatterplot 3D(
    invisible,
    Y( :Name( " x" ), :y, :z ),
    Coloring( :Name( " Mean Io" ) ),
    Legend( 1522 ),
    Frame3D(
     Legend( 1 ),
     Set Grab Handles( 0 ),
     Set Rotation( -64, 0, -41 ),
     Set Marker Scale( 5.2652 )
    ),
    Where( :Blade == BladeList[i] & :Embodiment == "THP"  ),
    SendToReport(
     Dispatch(
      {},
      "100",
      ScaleBox,
      {Legend Model(
       1522,
       Properties( 0, {gradient( {Color Theme( "Jet" )} )}, Item ID( " Mean Io", 1 ) )
      )}
     )
    )
   ), 
  )
 );
 hlb << append( vlb );
);