cancel
Showing results for 
Show  only  | Search instead for 
Did you mean: 
Browse apps to extend the software in the new JMP Marketplace
Choose Language Hide Translation Bar
UserID16644
Level V

Fit Y by X Spline fit color

Hi,

I have a fit Y by X plot with smoothing spline fit, is there any way that I can make the marker colors gray and the spline fit line in JMP default color? I tried changing the color theme into medium light gray, but it's not working

rbiv[Framebox( 1 )] << Row Legend( Column( col1 ), Color( 1 ), Marker( 0 ), Color Theme("JMP Default"), Continuous Scale( 0 ) );
10 REPLIES 10
ThuongLe
Level IV

Re: Fit Y by X Spline fit color

You can right click on the graph and select "Customize"

1.PNG

 

then select the color you want

2.PNG

 

Then export the script to window to see the real code behind

Oneway(
	Y( :Yield ),
	X( :WW ),
	SendToReport(
		Dispatch(
			{},
			"Oneway Plot",
			FrameBox,
			{DispatchSeg(
				Marker Seg( 1 ),
				{Color( "Orange" ), Marker( "Triangle" )}
			)}
		)
	)
);
Thuong Le
UserID16644
Level V

Re: Fit Y by X Spline fit color

Hi, I tried this method but it is not working when I put it into my function
ThuongLe
Level IV

Re: Fit Y by X Spline fit color

Can you share your full code?
Thuong Le
UserID16644
Level V

Re: Fit Y by X Spline fit color

Here's the function:

bivht = Function( {x_param, y_param, htt},
    biv = Bivariate(
        Y( Column( y_param ) ),
        X( Column( x_param ) ),
        GroupBy( Column( ht ) ),
        <<Fit Spline( 1000, {Line Width( 2 )} )
    );
    rbiv = biv << Report;
    rbiv[Framebox( 1 )] << {Marker Size( 3 )};
    rbiv[Axisbox( 2 )] << Tick Font( style( 0 ), size( 9 ) ) << Show Major Grid( 1 ) << Show Minor Grid( 1 ) <<
    Show Minor Ticks( 1 );
    rbiv[Axisbox( 1 )] << Tick Font( style( 0 ), size( 9 ) ) << Show Major Grid( 1 ) << Show Minor Grid( 1 ) <<
    Show Minor Ticks( 1 );
    rbiv[Text Edit Box( 2 )] << Set Font Size( 10 ) << Set Font Style( "Bold" );
    rbiv[Text Edit Box( 1 )] << Set Font Size( 10 ) << Set Font Style( "Bold" );
    rbiv[Outline Box( 1 )] << Set Title( y_param || " by " || x_param );
    rbiv["Smoothing Spline Fit, lambda=1000 ?"] << Close All Like This;
    rbiv[Framebox( 1 )] << Row Legend(
        Column( ht ),
        Color( 1 ),
        Marker( 0 ),
        Color Theme( "JMP Default" ),
        Continuous Scale( 0 )
    );
    rbiv[Border Box( 2 )] << Delete;
    pbiv = rbiv[Outline Box( 1 )] << get picture;
);
ThuongLe
Level IV

Re: Fit Y by X Spline fit color

Is this a typo or you have another variable named "ht"

111.PNG

Thuong Le
UserID16644
Level V

Re: Fit Y by X Spline fit color

ht is a variable name
ThuongLe
Level IV

Re: Fit Y by X Spline fit color

I mean in your function, you define htt but you never use it. Instead, you use ht
That could be the issue
Thuong Le
UserID16644
Level V

Re: Fit Y by X Spline fit color

lb = Lineup Box( N Col( 4 ) );
For( j = 1, j <= N Items( xparam ), j++,
    bivht( xparam[j], yparam[j], h );
    lb << append( pbiv );
    biv << Close Window;
);
ppt9 << append( lb << get picture );
ThuongLe
Level IV

Re: Fit Y by X Spline fit color

I'm lost now
Thuong Le