So You could readd the desired order below that even, then turn off the third axis.
Names default to here(1);
dt = New Table( "Test",
Add Rows( 6 ),
New Column( "Desired Order",
Numeric,
"Nominal",
Format( "Best", 12 ),
Set Values( [1, 2, 3, 4, 5, 6] )
),
New Column( "Category",
Character,
"Nominal",
Set Values( {"A", "B", "B", "A", "A", "B"} )
),
New Column( "Data",
Numeric,
"Continuous",
Format( "Best", 12 ),
Set Values( [1, 2, 3, 4, 5, 6] )
)
);
dt = Graph Builder(
Variables(
X( :Desired Order ),
X( :Category, Position( 1 ) ),
X( :Desired Order, Position( 1 ) ),
Y( :Data ),
Color( :Category )
),
Elements( Points( X( 1 ), X( 2 ), Y, Legend( 107 ) ) ),
SendToReport(
Dispatch(
{},
"Desired Order",
ScaleBox,
{Label Row(
3,
{Automatic Tick Marks( 0 ), Show Major Labels( 0 ),
Show Major Ticks( 0 )}
)}
),
Dispatch( {}, "400", LegendBox, {Set Title( "" )} )
)
);
Hope that works for you.