Show[GraphicsArray[{Table[p[[k]],{k,1,2}],
   Table[p[[k]],{k,3,4}],Table[p[[k]],{k,5,6}]}]];