Ciao a tutti,
Ho provato a creare una funzione ma continua a ricevere un errore con framebox, axisbox e outline box. Non capisco bene cosa c'è che non va nella funzione. Si prega di aiutare e spiegare
Nome non risolto: Framebox in accesso o valutazione di '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)")}))
);