For example, like this, I deliberately increased the data within the selected range:
Age ==14
dt=Open("$SAMPLE_DATA/Big Class.jmp");
dt<<Sort(By( age),Order(Ascending),replace table);
ca="NO";New Column(ca);Column(ca)<<Formula( if(row()==1|age!=lag(age,1),r=row();1,1+row()-r) );dt<<run formulas;Column(ca)<<deleteFormula;
ca="height1";New Column(ca);Column(ca)<<Formula( if(age==14,height*100,height) );dt<<run formulas;Column(ca)<<deleteFormula;
ca="weight1";New Column(ca);Column(ca)<<Formula( if(age==14,weight*100,weight) );dt<<run formulas;Column(ca)<<deleteFormula;
p1=dt<< Graph Builder(
Size( 534, 456 ),
Show Control Panel( 0 ),
Variables(
X( :NO ),
Y( :height1 ),
Y( :weight1, Position( 1 ), Side( "Right" ) )
),
Elements( Line( X, Y( 1 ), Legend( 5 ) ), Line( X, Y( 2 ), Legend( 6 ) ) )
);
Thanks Experts!
