> plots[display]([tet(3),cub(6),oct(9),dod(12),ico(15)]);