278008_zh-CN

liliconcom

循环遍历公式内的变量

你好，

对于我正在从事的一个项目，我创建了一个数据表列（动物编号平均），在其中我根据表 GroupAvg 中的基线值（治疗 C）计算 VO2 的一些相对值。

 

在这种情况下，每次评估只有一个基线值（VO2、RQ、EE），如 groupAvg 中所示，因为它是几天的平均值。 为此，我创建了以下效果很好的内容：

 

VarVehicleVo2 = :Name( "Mean(Mean(VO2-[ml/min]))" )[Data Table( "GroupAvg" ) <<
Get rows Where( Contains( :Treatment, "C" ))];

Animal No.Avg << New Column( "VO2 absolute relative (%)",
  Numeric,
  "Continuous",
  Format( "Best", 12 ),
  Formula(
   Local( {t0 = VarVehicleVo2()},
    (:Name( "Mean(Mean(VO2-[ml/min]))" ) / t0) * 100
   )
  )
 );

现在我必须再次执行相同操作，只是现在数据表 (GroupAvgSEM) 也包含天数，并且应该计算每一天的相对值（-6 到 30）。

 

当然，我可以执行与上面相同的操作并在所有日子中重复它，从而为每天创建一个带有局部变量的非常长的脚本，但这似乎有点极端。

 

我正在研究对治疗 C 数据进行子集化并将其拆分（按天）以便在公式内循环：

VarTable = GroupAvgSEM << select where(
 Contains( :Treatment, "ehicle" )) << subset( 
  output table name( "VarTable" ), selected rows( 1 ), selected columns( 0 ));

VarVO2 = VarTable << split(
   Output table name("VarVO2"),
   Split By( :Day no ),
   Split( :Name( "Mean(Mean(VO2-[ml/min]))" ) ),
   Remaining Columns( Drop All ),
   Sort by Column Property
  );


Animal No.Avg << New Column("VO2 absolute relative (%)",
    Numeric, <BR />    Formula(
  Local( {//loop through VarVO2 column values},
   (:Name( "Mean(Mean(VO2-[ml/min]))" ) / /*VarVO2 column values*/) * 100
  ))
 );

这是可能的还是我应该以不同的方式解决这个问题？

 

朱莉弟兄

 

 

消费者和市场研究数据混合和清理回复：循环遍历公式内的变量

尝试这个

dt = Data Table("Animal No.Avg");
tb = dt <<
Tabulate(
 Show Control Panel( 0 ),
 Add Table(
  Column Table(
   Analysis Columns( :Name( "Mean(VO2-[ml/min])" ) ),
   Statistics( Mean )
  ),
  Row Table( Grouping Columns( :Day no ) )
 ),
 Local Data Filter(
  Add Filter( columns( :Treatment ), Where( :Treatment == "C" ) )
 )
);
dt1 = tb << make into data table;

dt2 = dt << Join(
 With( dt1 ),
 Select(
  :Treatment,
  :Animal No.,
  :Day no,
  :N Rows,
  :Name( "Mean(VO2-[ml/min])" ),
  :Name( "Mean(RQ)" ),
  :Name( "Mean(EE-[kcal/h])" )
 ),
 SelectWith( :Name( "Mean(Mean(VO2-[ml/min]))" ) ),
 By Matching Columns( :Day no = :Day no ),
 Drop multiples( 0, 0 ),
 Include Nonmatches( 0, 0 ),
 Preserve main table order( 1 )
);

dt2 << New Column("Relative VO2",
 Formula(:Name( "Mean(VO2-[ml/min])" )/:Name( "Mean(Mean(VO2-[ml/min]))" ) * 100)
);

tb << Close Window;

close(dt1, NoSave);