Salut tout le monde,
J'ai essayé de créer une fonction mais elle continue d'obtenir une erreur avec la framebox, la axisbox et la outline box. Je ne comprends pas bien ce qui ne va pas avec la fonction. Merci d'aider et d'expliquer
Nom non résolu : Framebox dans l'accès ou l'évaluation de '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)")}))
);