Hi all,
I tried creating a function but it keeps getting an error with the framebox, axisbox and outline box. I don't understand the well what is wrong with the function. Please help and explain
Name Unresolved: Framebox in access or evaluation of 'Framebox' , Framebox( 1 ) /*###*/
bivplot = Function( {x_param, y_param, int1, int2 },
biv = Bivariate( X( Column( x_param ) ), Y( Column( y_param ) ),
Fit Line( {Confid Curves Indiv( 0 ), Line Color( "Black" )} ),
Fit Special( Intercept( int1 ), Slope( 1 ), {Line Color( "Purple" )} ),
Fit Special( Intercept( int2 ), Slope( 1 ), {Line Color( "Purple" )} ));
rbiv = biv << Report;
rbiv[Framebox( 1 )] << {Marker Size( 3 )};
rbiv[axisbox( 2 )] << Tick Font( style( 1 ), size( 9 ) ) << Show Major Grid( 1 ) << Show Minor Grid( 1 ) << Show Minor Ticks( 1 );
rbiv[axisbox( 1 )] << Tick Font( style( 1 ), size( 9 ) ) << Show Major Grid( 1 ) << Show Minor Grid( 1 ) << Show Minor Ticks( 1 );
rbiv[Framebox( 1 )] << Row Legend( Column( "Sex" ), Color( 1 ), Marker( 0 ), Color Theme( "JMP Default" ), Continuous Scale( 0 ) );
rbiv[Outline Box( 3 )] << Close All Below;
);
colnamex = {"name1", "age1"};
colname = {"name2", "age2"};
int1 = {1.5, 2};
int2 ={-1.5, -2};
lapbiv = Fit Group (
For( i = 1, i <= N Items( colname ), i++,
bivplot( colname[i], colnamex[i], int1[i], int2[i] )
);
<<{Arrange in Rows( 4 )}
SendToReport(Dispatch({},"Fit Group", OutlineBox,{Set Title( "Correlation Plot (All)")}))
);