Question: How to solve the unreasonable output form of pdf ?

I got a list containing all non isomorphic connected graphs with 6 vertices. Total number of the list members is 112 , and they are not too many . So I want to draw them all . It is good for Maple worksheet .
 
In order to save it and print it out on paper, I import it as pdf form . But the problem is that every page in pdf only contains 8 graphs . It wastes wasted too many spaces. It is unreasonable . I want to draw 20-30 graphs in one page of pdf. What is the solution to my problems? Thanks in advance. This problem has puzzled me for a long time.

with(GraphTheory):
s1:=[NonIsomorphicGraphs(6,restrictto = connected,output=graphs,outputform=graph)]:
DrawGraph~(s1);

 

Please Wait...