About skyzvoir0001

skyzvoir0001 · ‎03-03-2020

if(dt:class in ('Beta','Sigma'),for each row( If(:class=="", :class="NOT IN CLASS")));

skyzvoir0001 · ‎02-26-2020

I have two data tables [main dt & parameters dt] How do I not hardcode the parameters and only compute the mean, plot correlation and variance-cdf with the parameters listed in paramters dt? My parameter dt looks like this, Where I will only get mean,correlation and var-cdf if it has Y on it.

skyzvoir0001 · ‎02-11-2020

follow up question, how do i tweak this code so that it does not split it individually? for(i=1, i<=n, i++, if((contains item(Para[i], main_table_col_remain) == 1), param = main_table_col_remain[i]; tempdt =eval(parse( " combined_tab << Split( Split By(:Source_Table), Split(:Name(\!"" ||param|| "\!")), Remaining Columns(Drop All), Sort by Column Property )" ))));

skyzvoir0001 · ‎02-11-2020

para = {"Age","Orientation","Preference","Salary","Number","SN","Years","Service"} //some of the column names needed main_table_col_remain = main_tab << get column names(string); For( i = N Items( main_table_col_remain ), i > 0, i--, If(!Contains( main_table_col_remain[i], ?? ) , Remove From( main_table_col_remain, i ) )); What do i put in the "??" part? I've been circling around this code for a while now. I want to remove column names not stored in para.

skyzvoir0001 · ‎02-11-2020

Here's how my data looks like. I wanted it to fit x by y from which if manually done, Bivariate( Y( :Name( "AV_01_Age 208103-UP-1" ) ), X( :Name( "AV_01_Age 208103-DN-1" ) ) ); i wanted it like this Bivariate( Y( :Name( "AV_01_Age ^char(up)^" ) ), X( :Name( "AV_01_Age ^char(dn)^" ) ) ); where up = 208103-UP-1 dn = 208103-DN-1

skyzvoir0001 · ‎02-11-2020

Bivariate( Y( :Name( "Av_01_Age")), X( :Name( "Av T2_Age")) ); rev = colstoredvalue(smary,"Source_Table",1); bal = colstoredvalue(smary,"Source_Table",2); How do i concat the values in rev and bal to x & y respectively?

skyzvoir0001 · ‎02-10-2020

I have 190+ columns and I wanted to delete columns stored in the list Remain_columns = { column names I want to remain}. How do I do it using for loop?

skyzvoir0001 · ‎02-07-2020

but when trying the code i came up earlier, Current Data Table( subs ); t0p = Fit Group( For( i = 1, i <= N Items( parameters_1 ), i++, Oneway( X( Column( subs, "Recipe" ) ), Y( Try( Column( subs, parameters_1[i] ) ) ), With Control( 1 ), Quantiles( 1 ), Means and Std Dev( 1 ), CDF Plot( 1 ), Mean Error Bars( 1 ), Std Dev Lines( 1 ) ) ), SendToReport( Dispatch( {}, "Fit Group", OutlineBox, {Set Title( "TYPE=" || Char( type ) || "" )} ) ) ) << {Arrange in Rows( 2 )}; works but it does it individually.

skyzvoir0001 · ‎02-07-2020

Fit Group( For( i = 1, i <= N Items( parameters_1 ), i = i + 2, hlb = H List Box( Oneway( X( :Recipe ), Y( Try( Column( subs, parameters_1[i] ) ) ), With Control( 1 ), Quantiles( 1 ), Means and Std Dev( 1 ), CDF Plot( 1 ), Mean Error Bars( 1 ), Std Dev Lines( 1 ) ), Try( Oneway( X( :Recipe ), Y( Column( subs, parameters_1[i + 1] ) ), With Control( 1 ), Quantiles( 1 ), Means and Std Dev( 1 ), CDF Plot( 1 ), Mean Error Bars( 1 ), Std Dev Lines( 1 ) ) ); zippy = hlb << get picture; ) ) ); I tried the code you gave but somehow this gives me an error: Not Found in access or evaluation of 'Oneway' , Bad Argument( {Try( Column( subs_top, parameters_1[i] ) ), Role requires at least 1 columns.} ), Oneway(/*###*/X( :Recipe ), Y( Try( Column( subs_top, parameters_1[i] ) ) ), With Control( 1 ), Quantiles( 1 ), Means and Std Dev( 1 ), CDF Plot( 1 ), Mean Error Bars( 1 ), Std Dev Lines( 1 ) ) Fit Group[]

skyzvoir0001 · ‎02-06-2020

thanks for this!

skyzvoir0001 · ‎02-06-2020

update: fixed the output part- it now outputs from 1-23, my problem is how do i append it to ppt arranged in 2 or 3 plots per slide?

skyzvoir0001 · ‎02-06-2020

Im working with this code but somehow on the 9th output, it gets an error. Parameters_1 contains 23 items on it. current data table(subs); for (i = 1, i <= nitems(parameters_1), i++, print(i); Oneway( X( :Recipe ), Y( column(subs, parameters_1[i]) ), With Control(1), Quantiles(1), Means and Std Dev(1), CDF Plot(1), Mean Error Bars(1), Std Dev Lines(1), SendToReport( Dispatch( {}, "Fit Group", OutlineBox, {Set Title( "TYPE="||char(type)||"" )} ) ) ); ); The outputs from 1-8 are shown individually. How do I code such that my output is arranged by 2 and save it into a ppt.

skyzvoir0001 · ‎02-03-2020

Is it possible to save journal and append the .jrn file to ppt thru scripting?

skyzvoir0001 · ‎01-29-2020

How do i loop through columns to make a summary table of means?

skyzvoir0001 · ‎01-27-2020

Thanks for this!

skyzvoir0001 · ‎01-27-2020

how to generate the nth fibonacci number?

skyzvoir0001 · ‎01-22-2020

I have several data sets from excel. My question is that how do i delete the last two rows using scripting regardless of how many number of rows -- i only need to remove the last two rows since its of no use.

skyzvoir0001 · ‎01-08-2020

My code was running earlier and when i tried to run it now, i'd get this error. what seems to be the problem?

skyzvoir0001 · ‎12-11-2019

Hi, so i have a main table (main_dt) which i am going to update (update_dt). However, there are times when update_dt is empty. How do i make it such that the script continues to run? What function do i use for it to continue?

skyzvoir0001 · ‎11-21-2019

Thank you very much!

skyzvoir0001 · ‎11-21-2019

Hey thanks for the reply! But is there a way to do it thru scripting? Im trying to make a script dynamically which copies the plots directly to a powerpoint and I’ve been stuck on how to change the legend part.

skyzvoir0001 · ‎11-21-2019

Here is what i meant Bivariate( Y( :height ), X( :weight ), SendToReport( Dispatch( {}, "Bivar Plot", FrameBox, {Row Legend( age, Color( 1 ), Color Theme( "JMP Default" ), Marker( 0 ), Marker Theme( "" ), Continuous Scale( 0 ), Reverse Scale( 0 ), Excluded Rows( 0 ) )} ) ) ); ab = Data Table( "Big Class" ); ab << Select Where( :Age == 12 ) << Colors( 1 ) << Markers( 8 ) << clear select; The row legend where age=12 did not change however the markers on the plot did.

skyzvoir0001 · ‎11-20-2019

Thanks! The markers on the plot changed. However, why didnt it change on the legend part?

skyzvoir0001 · ‎11-19-2019

How to set the legend in age=14 to a circle with no fill thru scripting?

skyzvoir0001 · ‎11-06-2019

Hi, I'd like to ask a question. nw = Outline Box( wname, V List Box( Button Box( "Save All", sstat = saveall( 1, 330, 1, wname, sdir ) ), Spacer Box( Size( 1, 5 ) ), Tab Box( "Sat", V List Box( Button Box( "Save Tab" ), satplot( satp, grpname, grpname2, groupList ) ) ) ) ); dt << Select All Rows; title = Outline Box( "Plots by Design" ); title << append( nw[1] << get picture ); For( l = 1, l <= N Items( nw ), l++, title << append( nw[l] << get picture ) ); title << save presentation( "C:\Users\Desktop\Final.pptx", append ); Open( "C:\Users\Desktop\Final.pptx" ); My desired output is one plot per slide but the output is a long image of all graphs

skyzvoir0001 · ‎11-04-2019

Hi thanks for the reply! Is there a way to make them output like plot per slide and put a slide title?

skyzvoir0001 · ‎11-04-2019

Hi, I have this code which shows a window with multiple plots. Question is, how do i save the output in powerpoint as one slide? New Window( "Para v PGT", Lineup Box( N Col( 3 ), For( i = 1, i <= N Items( colname ), i++, For( j = 1, j <= N Items( colnamex ), j++, biv = Bivariate( Y( Column( dt, colname[i] ) ), X( Column( dt, colnamex[j] ) ), group by( groupcol ) ); rbiv = biv << report; rbiv[FrameBox( 1 )] << {Frame Size( 240, 190 ), Marker Size( 1 ), Line Width Scale( 3 )}; rbiv[axis box( 2 )] << Tick Font( style( 1 ), size( 9 ) ) << Show Major Grid( 1 ) << Show Minor Grid( 1 ) << Show Minor Ticks( 1 ); rbiv[axis box( 1 )] << Tick Font( style( 1 ), 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" ); ) ) ) );

skyzvoir0001 · ‎10-22-2019

Thank you for the reply! Do you have any idea how i should do it for the script to automatically run the script in different data sets with different column names without having to use the graph builder interactively? @txnelson wrote: Interactively, go to Graph Builder, and develop the graph to look the way you want it to look, and then just simply go to the red triangle, and select "Save Script". JMP creates the JSL for you.

skyzvoir0001 · ‎10-22-2019

Hi, im new to the jmp scripting language. The code below works(it shows bar graphs of the column 3 to n) but there is one thing i'd want to do. How do i script such that my output should be a stacked bar chart of all columns? for(i=3,i<=NItems(colList2),i++, gb= dt4 << Graph Builder( Size(534,454), Show Control Panel(0), Variables( X(:Label),Y(eval(Column(dt4,colList2[i]))), ), Elements(Bar(X,Y)) ));

Date Registered	‎10-22-2019 09:15 AM
Date Last Visited	‎03-03-2020 10:09 PM
Total Messages Posted	29

Online Status	Offline
Date Last Visited	‎03-03-2020 10:09 PM