Graphics3D[{{{{}, {}, {}, {}, Cuboid[{1, 5, 1}, {2, 6, 34.}], 
    Cuboid[{1, 6, 1}, {2, 7, 33.}], Cuboid[{1, 7, 1}, {2, 8, 27.}], 
    Cuboid[{1, 8, 1}, {2, 9, 27.}], Cuboid[{1, 9, 1}, {2, 10, 25.}], 
    Cuboid[{1, 10, 1}, {2, 11, 14.}]}, {{}, {}, {}, {}, 
    Cuboid[{2, 5, 1}, {3, 6, 23.}], {}, Cuboid[{2, 7, 1}, {3, 8, 24.}], 
    Cuboid[{2, 8, 1}, {3, 9, 15.}], Cuboid[{2, 9, 1}, {3, 10, 9.}], {}}, 
   {{}, {}, {}, {}, {}, Cuboid[{3, 6, 1}, {4, 7, 32.}], {}, {}, {}, {}}, 
   {{}, Cuboid[{4, 2, 1}, {5, 3, 26.}], {}, {}, {}, 
    Cuboid[{4, 6, 1}, {5, 7, 7.}], Cuboid[{4, 7, 1}, {5, 8, 22.}], {}, {}, 
    {}}, {{}, {}, {}, {}, {}, {}, Cuboid[{5, 7, 1}, {6, 8, 8.}], {}, {}, {}}, 
   {{}, {}, {}, {}, Cuboid[{6, 5, 1}, {7, 6, 18.}], 
    Cuboid[{6, 6, 1}, {7, 7, 12.}], Cuboid[{6, 7, 1}, {7, 8, 17.}], {}, {}, 
    {}}, {{}, {}, {}, {}, {}, {}, {}, {}, {}, {}}, 
   {{}, Cuboid[{8, 2, 1}, {9, 3, 16.}], {}, {}, Cuboid[{8, 5, 1}, 
     {9, 6, 20.}], {}, Cuboid[{8, 7, 1}, {9, 8, 7.}], {}, {}, {}}, 
   {{}, {}, {}, {}, {}, {}, {}, {}, {}, {}}, {{}, {}, {}, {}, 
    Cuboid[{10, 5, 1}, {11, 6, 10.}], Cuboid[{10, 6, 1}, {11, 7, 1.}], 
    Cuboid[{10, 7, 1}, {11, 8, 19.}], {}, {}, {}}, 
   {{}, {}, {}, {}, Cuboid[{11, 5, 1}, {12, 6, 2.}], 
    Cuboid[{11, 6, 1}, {12, 7, 1.}], Cuboid[{11, 7, 1}, {12, 8, 7.}], {}, {}, 
    {}}, {{}, {}, {}, {}, Cuboid[{12, 5, 1}, {13, 6, 4.}], 
    Cuboid[{12, 6, 1}, {13, 7, 11.}], Cuboid[{12, 7, 1}, {13, 8, 3.}], {}, 
    {}, {}}, {{}, {}, {}, {}, {}, {}, Cuboid[{13, 7, 1}, {14, 8, 1.}], 
    Cuboid[{13, 8, 1}, {14, 9, 15.}], Cuboid[{13, 9, 1}, {14, 10, 13.}], {}}, 
   {{}, {}, {}, {}, Cuboid[{14, 5, 1}, {15, 6, 2.}], 
    Cuboid[{14, 6, 1}, {15, 7, 29.}], Cuboid[{14, 7, 1}, {15, 8, 1.}], 
    Cuboid[{14, 8, 1}, {15, 9, 1.}], Cuboid[{14, 9, 1}, {15, 10, 6.}], {}}, 
   {{}, {}, {}, {}, {}, {}, Cuboid[{15, 7, 1}, {16, 8, 31.}], 
    Cuboid[{15, 8, 1}, {16, 9, 28.}], Cuboid[{15, 9, 1}, {16, 10, 4.}], {}}, 
   {{}, {}, {}, {}, {}, Cuboid[{16, 6, 1}, {17, 7, 2.}], 
    Cuboid[{16, 7, 1}, {17, 8, 2.}], {}, Cuboid[{16, 9, 1}, {17, 10, 21.}], 
    {}}, {{}, {}, {}, {}, {}, Cuboid[{17, 6, 1}, {18, 7, 4.}], 
    Cuboid[{17, 7, 1}, {18, 8, 5.}], {}, Cuboid[{17, 9, 1}, {18, 10, 30.}], 
    {}}, {{}, {}, {}, {}, {}, {}, {}, {}, {}, Cuboid[{18, 10, 1}, 
     {19, 11, 1.}]}}, GrayLevel[0], 
  {{{}, {}, {}, {RGBColor[1, 0, 0], Text["Fr", {1.5, 4.5, 1.33}]}, 
    {Text["Cs", {1.5, 5.5, 34.33}], Text["Cs", 
      {1.5, 5.5, 0.6699999999999999}]}, {Text["Rb", {1.5, 6.5, 33.33}], 
     Text["Rb", {1.5, 6.5, 0.6699999999999999}]}, 
    {Text["K", {1.5, 7.5, 27.33}], Text["K", 
      {1.5, 7.5, 0.6699999999999999}]}, {Text["Na", {1.5, 8.5, 27.33}], 
     Text["Na", {1.5, 8.5, 0.6699999999999999}]}, 
    {Text["Li", {1.5, 9.5, 25.33}], Text["Li", 
      {1.5, 9.5, 0.6699999999999999}]}, {Text["H", {1.5, 10.5, 14.33}], 
     Text["H", {1.5, 10.5, 0.6699999999999999}]}}, 
   {{}, {}, {}, {RGBColor[1, 0, 0], Text["Ra", {2.5, 4.5, 1.33}]}, 
    {Text["Ba", {2.5, 5.5, 23.33}], Text["Ba", 
      {2.5, 5.5, 0.6699999999999999}]}, {RGBColor[1, 0, 0], 
     Text["Sr", {2.5, 6.5, 1.33}]}, {Text["Ca", {2.5, 7.5, 24.33}], 
     Text["Ca", {2.5, 7.5, 0.6699999999999999}]}, 
    {Text["Mg", {2.5, 8.5, 15.33}], Text["Mg", 
      {2.5, 8.5, 0.6699999999999999}]}, {Text["Be", {2.5, 9.5, 9.33}], 
     Text["Be", {2.5, 9.5, 0.6699999999999999}]}, {}}, 
   {{RGBColor[1, 0, 0], Text["Ac", {3.5, 1.5, 1.33}]}, 
    {RGBColor[1, 0, 0], Text["La", {3.5, 2.5, 1.33}]}, {}, {}, {}, 
    {Text["Y", {3.5, 6.5, 32.33}], Text["Y", 
      {3.5, 6.5, 0.6699999999999999}]}, {RGBColor[1, 0, 0], 
     Text["Sc", {3.5, 7.5, 1.33}]}, {}, {}, {}}, 
   {{RGBColor[1, 0, 0], Text["Th", {4.5, 1.5, 1.33}]}, 
    {Text["Ce", {4.5, 2.5, 26.33}], Text["Ce", 
      {4.5, 2.5, 0.6699999999999999}]}, {}, {RGBColor[1, 0, 0], 
     Text["Rf", {4.5, 4.5, 1.33}]}, {RGBColor[1, 0, 0], 
     Text["Hf", {4.5, 5.5, 1.33}]}, {Text["Zr", {4.5, 6.5, 7.33}], 
     Text["Zr", {4.5, 6.5, 0.6699999999999999}]}, 
    {Text["Ti", {4.5, 7.5, 22.33}], Text["Ti", 
      {4.5, 7.5, 0.6699999999999999}]}, {}, {}, {}}, 
   {{RGBColor[1, 0, 0], Text["Pa", {5.5, 1.5, 1.33}]}, 
    {RGBColor[1, 0, 0], Text["Pr", {5.5, 2.5, 1.33}]}, {}, 
    {RGBColor[1, 0, 0], Text["Db", {5.5, 4.5, 1.33}]}, 
    {RGBColor[1, 0, 0], Text["Ta", {5.5, 5.5, 1.33}]}, 
    {RGBColor[1, 0, 0], Text["Nb", {5.5, 6.5, 1.33}]}, 
    {Text["V", {5.5, 7.5, 8.33}], Text["V", {5.5, 7.5, 0.6699999999999999}]}, 
    {}, {}, {}}, {{RGBColor[1, 0, 0], Text["U", {6.5, 1.5, 1.33}]}, 
    {RGBColor[1, 0, 0], Text["Nd", {6.5, 2.5, 1.33}]}, {}, 
    {RGBColor[1, 0, 0], Text["Sg", {6.5, 4.5, 1.33}]}, 
    {Text["W", {6.5, 5.5, 18.33}], Text["W", 
      {6.5, 5.5, 0.6699999999999999}]}, {Text["Mo", {6.5, 6.5, 12.33}], 
     Text["Mo", {6.5, 6.5, 0.6699999999999999}]}, 
    {Text["Cr", {6.5, 7.5, 17.33}], Text["Cr", 
      {6.5, 7.5, 0.6699999999999999}]}, {}, {}, {}}, 
   {{RGBColor[1, 0, 0], Text["Np", {7.5, 1.5, 1.33}]}, 
    {RGBColor[1, 0, 0], Text["Pm", {7.5, 2.5, 1.33}]}, {}, 
    {RGBColor[1, 0, 0], Text["Bh", {7.5, 4.5, 1.33}]}, 
    {RGBColor[1, 0, 0], Text["Re", {7.5, 5.5, 1.33}]}, 
    {RGBColor[1, 0, 0], Text["Tc", {7.5, 6.5, 1.33}]}, 
    {RGBColor[1, 0, 0], Text["Mn", {7.5, 7.5, 1.33}]}, {}, {}, {}}, 
   {{RGBColor[1, 0, 0], Text["Pu", {8.5, 1.5, 1.33}]}, 
    {Text["Sm", {8.5, 2.5, 16.33}], Text["Sm", 
      {8.5, 2.5, 0.6699999999999999}]}, {}, {RGBColor[1, 0, 0], 
     Text["Hs", {8.5, 4.5, 1.33}]}, {Text["Os", {8.5, 5.5, 20.33}], 
     Text["Os", {8.5, 5.5, 0.6699999999999999}]}, 
    {RGBColor[1, 0, 0], Text["Ru", {8.5, 6.5, 1.33}]}, 
    {Text["Fe", {8.5, 7.5, 7.33}], Text["Fe", 
      {8.5, 7.5, 0.6699999999999999}]}, {}, {}, {}}, 
   {{RGBColor[1, 0, 0], Text["Am", {9.5, 1.5, 1.33}]}, 
    {RGBColor[1, 0, 0], Text["Eu", {9.5, 2.5, 1.33}]}, {}, 
    {RGBColor[1, 0, 0], Text["Mt", {9.5, 4.5, 1.33}]}, 
    {RGBColor[1, 0, 0], Text["Ir", {9.5, 5.5, 1.33}]}, 
    {RGBColor[1, 0, 0], Text["Rh", {9.5, 6.5, 1.33}]}, 
    {RGBColor[1, 0, 0], Text["Co", {9.5, 7.5, 1.33}]}, {}, {}, {}}, 
   {{RGBColor[1, 0, 0], Text["Cm", {10.5, 1.5, 1.33}]}, 
    {RGBColor[1, 0, 0], Text["Gd", {10.5, 2.5, 1.33}]}, {}, 
    {RGBColor[1, 0, 0], Text["Ds", {10.5, 4.5, 1.33}]}, 
    {Text["Pt", {10.5, 5.5, 10.33}], Text["Pt", 
      {10.5, 5.5, 0.6699999999999999}]}, {Text["Pd", {10.5, 6.5, 1.33}], 
     Text["Pd", {10.5, 6.5, 1}]}, {Text["Ni", {10.5, 7.5, 19.33}], 
     Text["Ni", {10.5, 7.5, 0.6699999999999999}]}, {}, {}, {}}, 
   {{RGBColor[1, 0, 0], Text["Bk", {11.5, 1.5, 1.33}]}, 
    {RGBColor[1, 0, 0], Text["Tb", {11.5, 2.5, 1.33}]}, {}, 
    {RGBColor[1, 0, 0], Text["Rg", {11.5, 4.5, 1.33}]}, 
    {Text["Au", {11.5, 5.5, 2.33}], Text["Au", 
      {11.5, 5.5, 0.6699999999999999}]}, {Text["Ag", {11.5, 6.5, 1.33}], 
     Text["Ag", {11.5, 6.5, 1}]}, {Text["Cu", {11.5, 7.5, 7.33}], 
     Text["Cu", {11.5, 7.5, 0.6699999999999999}]}, {}, {}, {}}, 
   {{RGBColor[1, 0, 0], Text["Cf", {12.5, 1.5, 1.33}]}, 
    {RGBColor[1, 0, 0], Text["Dy", {12.5, 2.5, 1.33}]}, {}, 
    {RGBColor[1, 0, 0], Text["Uub", {12.5, 4.5, 1.33}]}, 
    {Text["Hg", {12.5, 5.5, 4.33}], Text["Hg", 
      {12.5, 5.5, 0.6699999999999999}]}, {Text["Cd", {12.5, 6.5, 11.33}], 
     Text["Cd", {12.5, 6.5, 0.6699999999999999}]}, 
    {Text["Zn", {12.5, 7.5, 3.33}], Text["Zn", 
      {12.5, 7.5, 0.6699999999999999}]}, {}, {}, {}}, 
   {{RGBColor[1, 0, 0], Text["Es", {13.5, 1.5, 1.33}]}, 
    {RGBColor[1, 0, 0], Text["Ho", {13.5, 2.5, 1.33}]}, {}, 
    {RGBColor[1, 0, 0], Text["Uut", {13.5, 4.5, 1.33}]}, 
    {RGBColor[1, 0, 0], Text["Tl", {13.5, 5.5, 1.33}]}, 
    {RGBColor[1, 0, 0], Text["In", {13.5, 6.5, 1.33}]}, 
    {Text["Ga", {13.5, 7.5, 1.33}], Text["Ga", {13.5, 7.5, 1}]}, 
    {Text["Al", {13.5, 8.5, 15.33}], Text["Al", 
      {13.5, 8.5, 0.6699999999999999}]}, {Text["B", {13.5, 9.5, 13.33}], 
     Text["B", {13.5, 9.5, 0.6699999999999999}]}, {}}, 
   {{RGBColor[1, 0, 0], Text["Fm", {14.5, 1.5, 1.33}]}, 
    {RGBColor[1, 0, 0], Text["Er", {14.5, 2.5, 1.33}]}, {}, 
    {RGBColor[1, 0, 0], Text["Uuq", {14.5, 4.5, 1.33}]}, 
    {Text["Pb", {14.5, 5.5, 2.33}], Text["Pb", 
      {14.5, 5.5, 0.6699999999999999}]}, {Text["Sn", {14.5, 6.5, 29.33}], 
     Text["Sn", {14.5, 6.5, 0.6699999999999999}]}, 
    {Text["Ge", {14.5, 7.5, 1.33}], Text["Ge", {14.5, 7.5, 1}]}, 
    {Text["Si", {14.5, 8.5, 1.33}], Text["Si", {14.5, 8.5, 1}]}, 
    {Text["C", {14.5, 9.5, 6.33}], Text["C", {14.5, 9.5, 
       0.6699999999999999}]}, {}}, 
   {{RGBColor[1, 0, 0], Text["Md", {15.5, 1.5, 1.33}]}, 
    {RGBColor[1, 0, 0], Text["Tm", {15.5, 2.5, 1.33}]}, {}, 
    {RGBColor[1, 0, 0], Text["Uup", {15.5, 4.5, 1.33}]}, 
    {RGBColor[1, 0, 0], Text["Bi", {15.5, 5.5, 1.33}]}, 
    {RGBColor[1, 0, 0], Text["Sb", {15.5, 6.5, 1.33}]}, 
    {Text["As", {15.5, 7.5, 31.33}], Text["As", 
      {15.5, 7.5, 0.6699999999999999}]}, {Text["P", {15.5, 8.5, 28.33}], 
     Text["P", {15.5, 8.5, 0.6699999999999999}]}, 
    {Text["N", {15.5, 9.5, 4.33}], Text["N", {15.5, 9.5, 
       0.6699999999999999}]}, {}}, 
   {{RGBColor[1, 0, 0], Text["No", {16.5, 1.5, 1.33}]}, 
    {RGBColor[1, 0, 0], Text["Yb", {16.5, 2.5, 1.33}]}, {}, 
    {RGBColor[1, 0, 0], Text["Uuh", {16.5, 4.5, 1.33}]}, 
    {RGBColor[1, 0, 0], Text["Po", {16.5, 5.5, 1.33}]}, 
    {Text["Te", {16.5, 6.5, 2.33}], Text["Te", 
      {16.5, 6.5, 0.6699999999999999}]}, {Text["Se", {16.5, 7.5, 2.33}], 
     Text["Se", {16.5, 7.5, 0.6699999999999999}]}, 
    {RGBColor[1, 0, 0], Text["S", {16.5, 8.5, 1.33}]}, 
    {Text["O", {16.5, 9.5, 21.33}], Text["O", 
      {16.5, 9.5, 0.6699999999999999}]}, {}}, 
   {{RGBColor[1, 0, 0], Text["Lr", {17.5, 1.5, 1.33}]}, 
    {RGBColor[1, 0, 0], Text["Lu", {17.5, 2.5, 1.33}]}, {}, 
    {RGBColor[1, 0, 0], Text["Uus", {17.5, 4.5, 1.33}]}, 
    {RGBColor[1, 0, 0], Text["At", {17.5, 5.5, 1.33}]}, 
    {Text["I", {17.5, 6.5, 4.33}], Text["I", {17.5, 6.5, 
       0.6699999999999999}]}, {Text["Br", {17.5, 7.5, 5.33}], 
     Text["Br", {17.5, 7.5, 0.6699999999999999}]}, 
    {RGBColor[1, 0, 0], Text["Cl", {17.5, 8.5, 1.33}]}, 
    {Text["F", {17.5, 9.5, 30.33}], Text["F", 
      {17.5, 9.5, 0.6699999999999999}]}, {}}, 
   {{}, {}, {}, {RGBColor[1, 0, 0], Text["Uuo", {18.5, 4.5, 1.33}]}, 
    {RGBColor[1, 0, 0], Text["Rn", {18.5, 5.5, 1.33}]}, 
    {RGBColor[1, 0, 0], Text["Xe", {18.5, 6.5, 1.33}]}, 
    {RGBColor[1, 0, 0], Text["Kr", {18.5, 7.5, 1.33}]}, 
    {RGBColor[1, 0, 0], Text["Ar", {18.5, 8.5, 1.33}]}, 
    {RGBColor[1, 0, 0], Text["Ne", {18.5, 9.5, 1.33}]}, 
    {Text["He", {18.5, 10.5, 1.33}], Text["He", {18.5, 10.5, 1}]}}}}, 
 ViewPoint -> {3, -4, 15}, BoxRatios -> {2, 1, 1}, ImageSize -> 500, 
 SphericalRegion -> True, Boxed -> False, Axes -> {False, False, True}, 
 Ticks -> {None, None, {{1, "-Graphics-"}, {2, "-Graphics-"}, 
    {3, "-Graphics-"}, {4, "-Graphics-"}, {5, "-Graphics-"}, 
    {6, "-Graphics-"}, {7, "-Graphics-"}, {8, "-Graphics-"}, 
    {9, "-Graphics-"}, {10, "-Graphics-"}, {11, "-Graphics-"}, 
    {12, "-Graphics-"}, {13, "-Graphics-"}, {14, "-Graphics-"}, 
    {15, "-Graphics-"}, {16, "-Graphics-"}, {17, "-Graphics-"}, 
    {18, "-Graphics-"}, {19, "-Graphics-"}, {20, "-Graphics-"}, 
    {21, "-Graphics-"}, {22, "-Graphics-"}, {23, "-Graphics-"}, 
    {24, "-Graphics-"}, {25, "-Graphics-"}, {26, "-Graphics-"}, 
    {27, "-Graphics-"}, {28, "-Graphics-"}, {29, "-Graphics-"}, 
    {30, "-Graphics-"}, {31, "-Graphics-"}, {32, "-Graphics-"}, 
    {33, "-Graphics-"}, {34, "-Graphics-"}}}, 
 BoxStyle -> Directive[FontFamily -> "Helvetica", FontSize -> 14, 
   RGBColor[1., 1., 1.]], TicksStyle -> Directive[FontFamily -> "Helvetica", 
   FontSize -> 14, RGBColor[1., 1., 1.]], PlotRange -> All, 
 Background -> RGBColor[0, 0, 0]]
