In reply to Rick Wicklin.

How about using the new substr feature to visualize experimental designs as you might find them printed in books?
.
start hadstr(n, c = '-+');
return(cshape(substr(c, (hadamard(n) + 3)/2, 1) , n, 1, n));
finish;
print ( hadstr(24) );
.
Best to use regular listing output if you try this.