構建正確循環的挑戰你好，
我對編碼不熟悉，並且在構建功能腳本方面面臨挑戰
dt = current data table();
//declaring and initializing variables//
lt_min = 1;
lt_max = 50;
RSquare_th = 0.9999;
count = 0;
//loop
while (count < 0.99999,
//calculate x for each y value
dt << New Column ("x", Numeric, formula(:y/ (:y + :avg_num)));
//plot bivariate
biv = dt << Bivariate(
Y( :x ),
X( :average_temp),
Fit Line( {Line Color( {212, 73, 88} )} ));
Bivariate_report = biv << report;
pt = Bivariate_report [Table Box(1)];
pt << Make Combined Data Table();
pt = Bivariate_report [Table Box(3)];
pt << Make Combined Data Table();
);
//get rsquare
rsquare << send (Bivariate Fit);
rsquare << send(Get Gen RSquare Test);
//check Rsq
if (rsquare < RSquare_th,
//increment light by 1
lt_min = lt_min +1,
count = count +1,
//update data table
dt << New Column("light", Numeric, formula(lt_min)),
//exit loop if RSQ >= threshold
print("Search Completed. RSQ >= threshold"),
);
自動化和腳本編寫回复：構建正確循環的挑戰在編輯器中使用 ctrl-M 來格式化 jsl：
dt = Current Data Table();
//declaring and initializing variables//
lt_min = 1;
lt_max = 50;
RSquare_th = 0.9999;
count = 0;
//loop
While( count < 0.99999,
//calculate x for each y value
dt << New Column( "x", Numeric, formula( :y / (:y + :avg_num) ) );
//plot bivariate
biv = dt << Bivariate(
Y( :x ),
X( :average_temp ),
Fit Line( {Line Color( {212, 73, 88} )} )
);
Bivariate_report = biv << report;
pt = Bivariate_report[Table Box( 1 )];
pt << Make Combined Data Table();
pt = Bivariate_report[Table Box( 3 )];
pt << Make Combined Data Table();
);
//get rsquare
rsquare << Send( Bivariate Fit );
rsquare << Send( Get Gen RSquare Test );
//check Rsq
If(
rsquare < RSquare_th,
//increment light by 1
lt_min = lt_min + 1,
count = count + 1,
//update data table
dt << New Column( "light", Numeric, formula( lt_min ) ),
//exit loop if RSQ >= threshold
Print( "Search Completed. RSQ >= threshold" ),
);
縮進將有助於理解循環正在運行的代碼。 特別是，請注意 count=count+1 不在循環內，因此它不會終止。
編輯： if 語句也需要工作，請參閱如果秘密
