dt = Open( "$SAMPLE_DATA/Liver Cancer.jmp" );

fd = Formula Depot(); // open a new Formula Depot

obj1 = dt << Run Script( "Lasso Poisson, Validation Column" );

model = obj1 << (Fit[1] << Publish Prediction Formula); /* add a formula. The following more complex script opens a formula depot report, adds a model to the depot, generates scoring code for the formula, saves the code to a file, and closes all windows.*/

case_name = "fitLS_prediction";

dest_dir = "c:\";  //CHANGE ME to a better location

dt = Open( "$SAMPLE_DATA/Big Class.jmp" );

Print( "Running " || case_name );

fm_ls = Fit Model(

	Y( :weight ),

	Effects( :age, :sex, :height ),

	Personality( Standard Least Squares ),

	Emphasis( "Minimal Report" ),

	Run

);

fd = fm_ls << Publish Prediction Formula;

Try(

	Print( "Generate Python Code" );

	fd << Generate Python Code();

	Wait( 1 );

	cw = Window( "Python Code Output" );

	ed = cw[Script Box( 1 )];

	code = ed << Get Text;

	Save Text File( dest_dir || case_name || ".py", code );

	cw << Close Window( No Save );

	Print( "Done." );

,

	Print( "Code generation failed for " || case_name || ", reason: " );

	Show( exception_msg );

);

fdw = Window( "Report: Formula Depot" );

fdw << Close Window( No Save );

Close( dt, No Save );