Here is a script that eliminates the need for Row # and the local filter.

```
dt = Current Data Table();
nrows = N Rows(dt);
dt << New Column("R Squared", Numeric, Continuous);
list_biv = list();
for (j = 1, j <= nrows-2,j++,
dt << clear rowstates;
dt << select where( Row() >= j);
dt << invert row selection;
dt << exclude;
biv = Bivariate(invisible,
Y( :Name( "Adj. Volume (Int)" ) ),
X( :Name( "Mass loaded (ug)" ) ),
Automatic Recalc( 1 ),
Fit Line( {Line Color( {212, 73, 88} )} )
);
RSquare = (Report(biv)["Linear Fit"][NumberColBox(1)]<<get)[1] ;
:Name("R Squared")[j] = Rsquare;
);
dt << clear rowstates;
```

and I am not having any issue with the RSquare remaining the same

Jim