I have an interactive code for showing the crystallographic in Mathematica.

LatticeData[ Which[Type == "FCC", "FaceCenteredCubic", Type == "BCC", "BodyCenteredCubic", Type == "SC", "SimpleCubic"], "Image"]

However this shows only one unit, which means the planes that don't fit in the cell won't be shown. Is there a easy way to show more than one unit cell in the LatticeData image?