title: Using Mathematica to generate crystal lattices
body: <p>How do you generate a 3x3x3 lattice in Mathematica? Is it possible to color some of the lattice points? It seems that it is possible but I cannot get it to work so far</p>
  
  <p><a href="http://reference.wolfram.com/mathematica/ref/LatticeData.html" rel="nofollow noreferrer">http://reference.wolfram.com/mathematica/ref/LatticeData.html</a></p>
  
  <p>What I mean by 3x3x3 is something like figure (c) on the right:<a href="http://physics.ucsd.edu/was-sdphul/labs/2dl/exp6/exp63.gif" rel="nofollow noreferrer">http://physics.ucsd.edu/was-sdphul/labs/2dl/exp6/exp63.gif</a></p>