Graphics3D[{{{{}, {}, {}, {}, Cuboid[{1, 5, 0}, {2, 6, 1.6}], 
    Cuboid[{1, 6, 0}, {2, 7, 2.5}], Cuboid[{1, 7, 0}, {2, 8, 3.1}], 
    Cuboid[{1, 8, 0}, {2, 9, 6.3}], Cuboid[{1, 9, 0}, {2, 10, 11.}], {}}, 
   {{}, {}, {}, {}, Cuboid[{2, 5, 0}, {3, 6, 9.6}], {}, 
    Cuboid[{2, 7, 0}, {3, 8, 17.}], Cuboid[{2, 8, 0}, {3, 9, 45.}], 
    Cuboid[{2, 9, 0}, {3, 10, 130.}], {}}, 
   {{}, Cuboid[{3, 2, 0}, {4, 3, 28.}], {}, {}, {}, 
    Cuboid[{3, 6, 0}, {4, 7, 41.}], Cuboid[{3, 7, 0}, {4, 8, 57.}], {}, {}, 
    {}}, {Cuboid[{4, 1, 0}, {5, 2, 54.}], Cuboid[{4, 2, 0}, {5, 3, 22.}], {}, 
    {}, Cuboid[{4, 5, 0}, {5, 6, 110.}], {}, Cuboid[{4, 7, 0}, {5, 8, 110.}], 
    {}, {}, {}}, {{}, Cuboid[{5, 2, 0}, {6, 3, 29.}], {}, {}, 
    Cuboid[{5, 5, 0}, {6, 6, 200.}], Cuboid[{5, 6, 0}, {6, 7, 170.}], 
    Cuboid[{5, 7, 0}, {6, 8, 160.}], {}, {}, {}}, 
   {Cuboid[{6, 1, 0}, {7, 2, 100.}], Cuboid[{6, 2, 0}, {7, 3, 32.}], {}, {}, 
    Cuboid[{6, 5, 0}, {7, 6, 310.}], Cuboid[{6, 6, 0}, {7, 7, 230.}], 
    Cuboid[{6, 7, 0}, {7, 8, 160.}], {}, {}, {}}, 
   {{}, Cuboid[{7, 2, 0}, {8, 3, 33.}], {}, {}, Cuboid[{7, 5, 0}, 
     {8, 6, 370.}], {}, Cuboid[{7, 7, 0}, {8, 8, 120.}], {}, {}, {}}, 
   {{}, Cuboid[{8, 2, 0}, {9, 3, 38.}], {}, {}, {}, 
    Cuboid[{8, 6, 0}, {9, 7, 220.}], Cuboid[{8, 7, 0}, {9, 8, 170.}], {}, {}, 
    {}}, {{}, Cuboid[{9, 2, 0}, {10, 3, 8.3}], {}, {}, 
    Cuboid[{9, 5, 0}, {10, 6, 320.}], Cuboid[{9, 6, 0}, {10, 7, 380.}], 
    Cuboid[{9, 7, 0}, {10, 8, 180.}], {}, {}, {}}, 
   {{}, Cuboid[{10, 2, 0}, {11, 3, 38.}], {}, {}, 
    Cuboid[{10, 5, 0}, {11, 6, 230.}], Cuboid[{10, 6, 0}, {11, 7, 180.}], 
    Cuboid[{10, 7, 0}, {11, 8, 180.}], {}, {}, {}}, 
   {{}, Cuboid[{11, 2, 0}, {12, 3, 38.7}], {}, {}, 
    Cuboid[{11, 5, 0}, {12, 6, 220.}], Cuboid[{11, 6, 0}, {12, 7, 100.}], 
    Cuboid[{11, 7, 0}, {12, 8, 140.}], {}, {}, {}}, 
   {{}, Cuboid[{12, 2, 0}, {13, 3, 41.}], {}, {}, 
    Cuboid[{12, 5, 0}, {13, 6, 25.}], Cuboid[{12, 6, 0}, {13, 7, 42.}], 
    Cuboid[{12, 7, 0}, {13, 8, 70.}], {}, {}, {}}, 
   {{}, Cuboid[{13, 2, 0}, {14, 3, 40.}], {}, {}, 
    Cuboid[{13, 5, 0}, {14, 6, 43.}], {}, {}, Cuboid[{13, 8, 0}, 
     {14, 9, 76.}], Cuboid[{13, 9, 0}, {14, 10, 320.}], {}}, 
   {{}, Cuboid[{14, 2, 0}, {15, 3, 44.}], {}, {}, 
    Cuboid[{14, 5, 0}, {15, 6, 46.}], Cuboid[{14, 6, 0}, {15, 7, 58.}], {}, 
    Cuboid[{14, 8, 0}, {15, 9, 100.}], Cuboid[{14, 9, 0}, {15, 10, 33.}], 
    {}}, {{}, Cuboid[{15, 2, 0}, {16, 3, 45.}], {}, {}, 
    Cuboid[{15, 5, 0}, {16, 6, 31.}], Cuboid[{15, 6, 0}, {16, 7, 42.}], 
    Cuboid[{15, 7, 0}, {16, 8, 22.}], Cuboid[{15, 8, 0}, {16, 9, 11.}], {}, 
    {}}, {{}, Cuboid[{16, 2, 0}, {17, 3, 31.}], {}, {}, {}, 
    Cuboid[{16, 6, 0}, {17, 7, 65.}], Cuboid[{16, 7, 0}, {17, 8, 8.3}], 
    Cuboid[{16, 8, 0}, {17, 9, 7.7}], {}, {}}, 
   {{}, Cuboid[{17, 2, 0}, {18, 3, 48.}], {}, {}, {}, 
    Cuboid[{17, 6, 0}, {18, 7, 7.7}], Cuboid[{17, 7, 0}, {18, 8, 1.9}], 
    Cuboid[{17, 8, 0}, {18, 9, 1.1}], {}, {}}, {{}, {}, {}, {}, {}, {}, {}, 
    {}, {}, {}}}, GrayLevel[0], 
  {{{}, {}, {}, {RGBColor[1, 0, 0], Text["Fr", 
      {1.5, 4.5, 3.7889999999999997}]}, 
    {Text["Cs", {1.5, 5.5, 5.388999999999999}], 
     Text["Cs", {1.5, 5.5, -3.7889999999999997}]}, 
    {Text["Rb", {1.5, 6.5, 6.289}], Text["Rb", 
      {1.5, 6.5, -3.7889999999999997}]}, 
    {Text["K", {1.5, 7.5, 6.888999999999999}], 
     Text["K", {1.5, 7.5, -3.7889999999999997}]}, 
    {Text["Na", {1.5, 8.5, 10.088999999999999}], 
     Text["Na", {1.5, 8.5, -3.7889999999999997}]}, 
    {Text["Li", {1.5, 9.5, 14.789}], Text["Li", 
      {1.5, 9.5, -3.7889999999999997}]}, {RGBColor[1, 0, 0], 
     Text["H", {1.5, 10.5, 3.7889999999999997}]}}, 
   {{}, {}, {}, {RGBColor[1, 0, 0], Text["Ra", 
      {2.5, 4.5, 3.7889999999999997}]}, {Text["Ba", {2.5, 5.5, 13.389}], 
     Text["Ba", {2.5, 5.5, -3.7889999999999997}]}, 
    {RGBColor[1, 0, 0], Text["Sr", {2.5, 6.5, 3.7889999999999997}]}, 
    {Text["Ca", {2.5, 7.5, 20.789}], Text["Ca", 
      {2.5, 7.5, -3.7889999999999997}]}, {Text["Mg", {2.5, 8.5, 48.789}], 
     Text["Mg", {2.5, 8.5, -3.7889999999999997}]}, 
    {Text["Be", {2.5, 9.5, 133.789}], Text["Be", 
      {2.5, 9.5, -3.7889999999999997}]}, {}}, 
   {{RGBColor[1, 0, 0], Text["Ac", {3.5, 1.5, 3.7889999999999997}]}, 
    {Text["La", {3.5, 2.5, 31.789}], Text["La", 
      {3.5, 2.5, -3.7889999999999997}]}, {}, {}, {}, 
    {Text["Y", {3.5, 6.5, 44.789}], Text["Y", 
      {3.5, 6.5, -3.7889999999999997}]}, {Text["Sc", {3.5, 7.5, 60.789}], 
     Text["Sc", {3.5, 7.5, -3.7889999999999997}]}, {}, {}, {}}, 
   {{Text["Th", {4.5, 1.5, 57.789}], Text["Th", 
      {4.5, 1.5, -3.7889999999999997}]}, {Text["Ce", {4.5, 2.5, 25.789}], 
     Text["Ce", {4.5, 2.5, -3.7889999999999997}]}, {}, 
    {RGBColor[1, 0, 0], Text["Rf", {4.5, 4.5, 3.7889999999999997}]}, 
    {Text["Hf", {4.5, 5.5, 113.789}], Text["Hf", 
      {4.5, 5.5, -3.7889999999999997}]}, {RGBColor[1, 0, 0], 
     Text["Zr", {4.5, 6.5, 3.7889999999999997}]}, 
    {Text["Ti", {4.5, 7.5, 113.789}], Text["Ti", 
      {4.5, 7.5, -3.7889999999999997}]}, {}, {}, {}}, 
   {{RGBColor[1, 0, 0], Text["Pa", {5.5, 1.5, 3.7889999999999997}]}, 
    {Text["Pr", {5.5, 2.5, 32.789}], Text["Pr", 
      {5.5, 2.5, -3.7889999999999997}]}, {}, {RGBColor[1, 0, 0], 
     Text["Db", {5.5, 4.5, 3.7889999999999997}]}, 
    {Text["Ta", {5.5, 5.5, 203.789}], Text["Ta", 
      {5.5, 5.5, -3.7889999999999997}]}, {Text["Nb", {5.5, 6.5, 173.789}], 
     Text["Nb", {5.5, 6.5, -3.7889999999999997}]}, 
    {Text["V", {5.5, 7.5, 163.789}], Text["V", 
      {5.5, 7.5, -3.7889999999999997}]}, {}, {}, {}}, 
   {{Text["U", {6.5, 1.5, 103.789}], Text["U", 
      {6.5, 1.5, -3.7889999999999997}]}, {Text["Nd", {6.5, 2.5, 35.789}], 
     Text["Nd", {6.5, 2.5, -3.7889999999999997}]}, {}, 
    {RGBColor[1, 0, 0], Text["Sg", {6.5, 4.5, 3.7889999999999997}]}, 
    {Text["W", {6.5, 5.5, 313.789}], Text["W", 
      {6.5, 5.5, -3.7889999999999997}]}, {Text["Mo", {6.5, 6.5, 233.789}], 
     Text["Mo", {6.5, 6.5, -3.7889999999999997}]}, 
    {Text["Cr", {6.5, 7.5, 163.789}], Text["Cr", 
      {6.5, 7.5, -3.7889999999999997}]}, {}, {}, {}}, 
   {{RGBColor[1, 0, 0], Text["Np", {7.5, 1.5, 3.7889999999999997}]}, 
    {Text["Pm", {7.5, 2.5, 36.789}], Text["Pm", 
      {7.5, 2.5, -3.7889999999999997}]}, {}, {RGBColor[1, 0, 0], 
     Text["Bh", {7.5, 4.5, 3.7889999999999997}]}, 
    {Text["Re", {7.5, 5.5, 373.789}], Text["Re", 
      {7.5, 5.5, -3.7889999999999997}]}, {RGBColor[1, 0, 0], 
     Text["Tc", {7.5, 6.5, 3.7889999999999997}]}, 
    {Text["Mn", {7.5, 7.5, 123.789}], Text["Mn", 
      {7.5, 7.5, -3.7889999999999997}]}, {}, {}, {}}, 
   {{RGBColor[1, 0, 0], Text["Pu", {8.5, 1.5, 3.7889999999999997}]}, 
    {Text["Sm", {8.5, 2.5, 41.789}], Text["Sm", 
      {8.5, 2.5, -3.7889999999999997}]}, {}, {RGBColor[1, 0, 0], 
     Text["Hs", {8.5, 4.5, 3.7889999999999997}]}, 
    {RGBColor[1, 0, 0], Text["Os", {8.5, 5.5, 3.7889999999999997}]}, 
    {Text["Ru", {8.5, 6.5, 223.789}], Text["Ru", 
      {8.5, 6.5, -3.7889999999999997}]}, {Text["Fe", {8.5, 7.5, 173.789}], 
     Text["Fe", {8.5, 7.5, -3.7889999999999997}]}, {}, {}, {}}, 
   {{RGBColor[1, 0, 0], Text["Am", {9.5, 1.5, 3.7889999999999997}]}, 
    {Text["Eu", {9.5, 2.5, 12.089}], Text["Eu", 
      {9.5, 2.5, -3.7889999999999997}]}, {}, {RGBColor[1, 0, 0], 
     Text["Mt", {9.5, 4.5, 3.7889999999999997}]}, 
    {Text["Ir", {9.5, 5.5, 323.789}], Text["Ir", 
      {9.5, 5.5, -3.7889999999999997}]}, {Text["Rh", {9.5, 6.5, 383.789}], 
     Text["Rh", {9.5, 6.5, -3.7889999999999997}]}, 
    {Text["Co", {9.5, 7.5, 183.789}], Text["Co", 
      {9.5, 7.5, -3.7889999999999997}]}, {}, {}, {}}, 
   {{RGBColor[1, 0, 0], Text["Cm", {10.5, 1.5, 3.7889999999999997}]}, 
    {Text["Gd", {10.5, 2.5, 41.789}], Text["Gd", 
      {10.5, 2.5, -3.7889999999999997}]}, {}, {RGBColor[1, 0, 0], 
     Text["Ds", {10.5, 4.5, 3.7889999999999997}]}, 
    {Text["Pt", {10.5, 5.5, 233.789}], Text["Pt", 
      {10.5, 5.5, -3.7889999999999997}]}, {Text["Pd", {10.5, 6.5, 183.789}], 
     Text["Pd", {10.5, 6.5, -3.7889999999999997}]}, 
    {Text["Ni", {10.5, 7.5, 183.789}], Text["Ni", 
      {10.5, 7.5, -3.7889999999999997}]}, {}, {}, {}}, 
   {{RGBColor[1, 0, 0], Text["Bk", {11.5, 1.5, 3.7889999999999997}]}, 
    {Text["Tb", {11.5, 2.5, 42.489000000000004}], 
     Text["Tb", {11.5, 2.5, -3.7889999999999997}]}, {}, 
    {RGBColor[1, 0, 0], Text["Rg", {11.5, 4.5, 3.7889999999999997}]}, 
    {Text["Au", {11.5, 5.5, 223.789}], Text["Au", 
      {11.5, 5.5, -3.7889999999999997}]}, {Text["Ag", {11.5, 6.5, 103.789}], 
     Text["Ag", {11.5, 6.5, -3.7889999999999997}]}, 
    {Text["Cu", {11.5, 7.5, 143.789}], Text["Cu", 
      {11.5, 7.5, -3.7889999999999997}]}, {}, {}, {}}, 
   {{RGBColor[1, 0, 0], Text["Cf", {12.5, 1.5, 3.7889999999999997}]}, 
    {Text["Dy", {12.5, 2.5, 44.789}], Text["Dy", 
      {12.5, 2.5, -3.7889999999999997}]}, {}, {RGBColor[1, 0, 0], 
     Text["Uub", {12.5, 4.5, 3.7889999999999997}]}, 
    {Text["Hg", {12.5, 5.5, 28.789}], Text["Hg", 
      {12.5, 5.5, -3.7889999999999997}]}, {Text["Cd", {12.5, 6.5, 45.789}], 
     Text["Cd", {12.5, 6.5, -3.7889999999999997}]}, 
    {Text["Zn", {12.5, 7.5, 73.789}], Text["Zn", 
      {12.5, 7.5, -3.7889999999999997}]}, {}, {}, {}}, 
   {{RGBColor[1, 0, 0], Text["Es", {13.5, 1.5, 3.7889999999999997}]}, 
    {Text["Ho", {13.5, 2.5, 43.789}], Text["Ho", 
      {13.5, 2.5, -3.7889999999999997}]}, {}, {RGBColor[1, 0, 0], 
     Text["Uut", {13.5, 4.5, 3.7889999999999997}]}, 
    {Text["Tl", {13.5, 5.5, 46.789}], Text["Tl", 
      {13.5, 5.5, -3.7889999999999997}]}, {RGBColor[1, 0, 0], 
     Text["In", {13.5, 6.5, 3.7889999999999997}]}, 
    {RGBColor[1, 0, 0], Text["Ga", {13.5, 7.5, 3.7889999999999997}]}, 
    {Text["Al", {13.5, 8.5, 79.789}], Text["Al", 
      {13.5, 8.5, -3.7889999999999997}]}, {Text["B", {13.5, 9.5, 323.789}], 
     Text["B", {13.5, 9.5, -3.7889999999999997}]}, {}}, 
   {{RGBColor[1, 0, 0], Text["Fm", {14.5, 1.5, 3.7889999999999997}]}, 
    {Text["Er", {14.5, 2.5, 47.789}], Text["Er", 
      {14.5, 2.5, -3.7889999999999997}]}, {}, {RGBColor[1, 0, 0], 
     Text["Uuq", {14.5, 4.5, 3.7889999999999997}]}, 
    {Text["Pb", {14.5, 5.5, 49.789}], Text["Pb", 
      {14.5, 5.5, -3.7889999999999997}]}, {Text["Sn", {14.5, 6.5, 61.789}], 
     Text["Sn", {14.5, 6.5, -3.7889999999999997}]}, 
    {RGBColor[1, 0, 0], Text["Ge", {14.5, 7.5, 3.7889999999999997}]}, 
    {Text["Si", {14.5, 8.5, 103.789}], Text["Si", 
      {14.5, 8.5, -3.7889999999999997}]}, {Text["C", {14.5, 9.5, 36.789}], 
     Text["C", {14.5, 9.5, -3.7889999999999997}]}, {}}, 
   {{RGBColor[1, 0, 0], Text["Md", {15.5, 1.5, 3.7889999999999997}]}, 
    {Text["Tm", {15.5, 2.5, 48.789}], Text["Tm", 
      {15.5, 2.5, -3.7889999999999997}]}, {}, {RGBColor[1, 0, 0], 
     Text["Uup", {15.5, 4.5, 3.7889999999999997}]}, 
    {Text["Bi", {15.5, 5.5, 34.789}], Text["Bi", 
      {15.5, 5.5, -3.7889999999999997}]}, {Text["Sb", {15.5, 6.5, 45.789}], 
     Text["Sb", {15.5, 6.5, -3.7889999999999997}]}, 
    {Text["As", {15.5, 7.5, 25.789}], Text["As", 
      {15.5, 7.5, -3.7889999999999997}]}, {Text["P", {15.5, 8.5, 14.789}], 
     Text["P", {15.5, 8.5, -3.7889999999999997}]}, 
    {RGBColor[1, 0, 0], Text["N", {15.5, 9.5, 3.7889999999999997}]}, {}}, 
   {{RGBColor[1, 0, 0], Text["No", {16.5, 1.5, 3.7889999999999997}]}, 
    {Text["Yb", {16.5, 2.5, 34.789}], Text["Yb", 
      {16.5, 2.5, -3.7889999999999997}]}, {}, {RGBColor[1, 0, 0], 
     Text["Uuh", {16.5, 4.5, 3.7889999999999997}]}, 
    {RGBColor[1, 0, 0], Text["Po", {16.5, 5.5, 3.7889999999999997}]}, 
    {Text["Te", {16.5, 6.5, 68.789}], Text["Te", 
      {16.5, 6.5, -3.7889999999999997}]}, {Text["Se", {16.5, 7.5, 12.089}], 
     Text["Se", {16.5, 7.5, -3.7889999999999997}]}, 
    {Text["S", {16.5, 8.5, 11.489}], Text["S", 
      {16.5, 8.5, -3.7889999999999997}]}, {RGBColor[1, 0, 0], 
     Text["O", {16.5, 9.5, 3.7889999999999997}]}, {}}, 
   {{RGBColor[1, 0, 0], Text["Lr", {17.5, 1.5, 3.7889999999999997}]}, 
    {Text["Lu", {17.5, 2.5, 51.789}], Text["Lu", 
      {17.5, 2.5, -3.7889999999999997}]}, {}, {RGBColor[1, 0, 0], 
     Text["Uus", {17.5, 4.5, 3.7889999999999997}]}, 
    {RGBColor[1, 0, 0], Text["At", {17.5, 5.5, 3.7889999999999997}]}, 
    {Text["I", {17.5, 6.5, 11.489}], Text["I", 
      {17.5, 6.5, -3.7889999999999997}]}, {Text["Br", {17.5, 7.5, 5.689}], 
     Text["Br", {17.5, 7.5, -3.7889999999999997}]}, 
    {Text["Cl", {17.5, 8.5, 4.888999999999999}], 
     Text["Cl", {17.5, 8.5, -3.7889999999999997}]}, 
    {RGBColor[1, 0, 0], Text["F", {17.5, 9.5, 3.7889999999999997}]}, {}}, 
   {{}, {}, {}, {RGBColor[1, 0, 0], Text["Uuo", 
      {18.5, 4.5, 3.7889999999999997}]}, {RGBColor[1, 0, 0], 
     Text["Rn", {18.5, 5.5, 3.7889999999999997}]}, 
    {RGBColor[1, 0, 0], Text["Xe", {18.5, 6.5, 3.7889999999999997}]}, 
    {RGBColor[1, 0, 0], Text["Kr", {18.5, 7.5, 3.7889999999999997}]}, 
    {RGBColor[1, 0, 0], Text["Ar", {18.5, 8.5, 3.7889999999999997}]}, 
    {RGBColor[1, 0, 0], Text["Ne", {18.5, 9.5, 3.7889999999999997}]}, 
    {RGBColor[1, 0, 0], Text["He", {18.5, 10.5, 3.7889999999999997}]}}}}, 
 ViewPoint -> {3, -4, 15}, BoxRatios -> {2, 1, 1}, ImageSize -> 500, 
 SphericalRegion -> True, Boxed -> False, Axes -> {False, False, True}, 
 Ticks -> {None, None, Automatic}, 
 BoxStyle -> Directive[FontFamily -> "Helvetica", FontSize -> 14, 
   RGBColor[0, 0, 0]], TicksStyle -> Directive[FontFamily -> "Helvetica", 
   FontSize -> 14, RGBColor[0, 0, 0]], PlotRange -> All, 
 Background -> RGBColor[0.6666666666666666, 0.6666666666666666, 
   0.6666666666666666]]
