Here's an example. If I push it a little further, e.g. by decreasing the std dev, the ANOVA p-value will show as "0". For Dunnett's method, low p-values are less accurate. They appear to show as "0" if lower than about 1e-15.
dt = New Table("test", add rows(2e3), New Column("X", character), New Column("Y", numeric));
For Each Row(
If(Row() > 1e3,
:X = "B";
:Y = Random Normal(0, 50);
,
:X = "A";
:Y = Random Normal(1e2, 50);
)
);
dt << Oneway(
Y(:Y),
X(:X),
With Control(1, {"A"}),
Means(1),
SendToReport(
Dispatch({"Oneway Anova", "Analysis of Variance"}, "Prob > F", NumberColBox, {Set Format("Best", 12)}),
Dispatch(
{"Means Comparisons", "Comparisons with a control using Dunnett's Method", "LSD Threshold Matrix"},
"p-Value",
NumberColBox,
{Set Format("Best", 12)}
)
)
);