1.
|
2.
|
3.
|
4.
|
5.
|
Click OK.
|
7.
|
Click the Oneway Analysis red triangle and select Save Script > To Script Window.
|
Oneway(
Y( :height ),
X( :age ),
Each Pair( 1 ),
Means( 1 ),
Mean Diamonds( 1 ),
Comparison Circles( 1 )
);
•
|
The script begins with a call to the Oneway() function, which returns a Oneway object.
|
•
|
The parentheses after the Oneway() function contain arguments that tell the Oneway function how to make the object.
|
–
|
–
|
•
|
1.
|
(Optional) Right-click in the script and select Show Embedded Log.
|
In this example, use the name oneObj:
oneObj = Oneway(
Y( :height ),
X( :age ),
Each Pair( 1 ),
Means( 1 ),
Mean Diamonds( 1 ),
Comparison Circles( 1 )
);
3.
|
Click Run Script .
|
This creates the Oneway object and sets the variable oneObj. Now, send a message to tell the platform to turn on the Unequal Variances report.
4.
|
At the end of the script, add the following line: oneObj << Unequal Variances(1), as shown here:
|
oneObj = Oneway(
Y( :height ),
X( :age ),
Each Pair( 1 ),
Means( 1 ),
Mean Diamonds( 1 ),
Comparison Circles( 1 )
);
oneObj << Unequal Variances( 1 );
5.
|
rep = Report( oneObj );
rep["Oneway Anova"] << Close( 1 );
rep["Means Comparisons"] << Close( 1 );
The Report() function returns the report object for the Oneway platform, and stores a reference to the report in the JSL variable called rep. You can send messages or perform actions on the report object, such as closing specific report outlines.
7.
|
Highlight these last 3 lines of the script and click Run Script .
|
If you close the Big Class.jmp sample data table at this point and then try to run the script, you are prompted to open a data table. A best practice is to precede the call to the Oneway platform with an Open() function to open the associated data table each time the script is run.
dt = Open( "$SAMPLE_DATA/Big Class.jmp" );
dt = Open( "$SAMPLE_DATA/Big Class.jmp" );
oneObj = Oneway(
Y( :height ),
X( :age ),
Each Pair( 1 ),
Means( 1 ),
Mean Diamonds( 1 ),
Comparison Circles( 1 )
);
oneObj << Unequal Variances( 1 );
rep = Report( oneObj );
rep["Oneway Anova"] << Close( 1 );
rep["Means Comparisons"] << Close( 1 );
2.
|
From the script window, select File > Save As. Enter a name for your script and save it to any directory.
|