Graphics3D[{{{{}, {}, {}, {}, {}, Cuboid[{1, 6, 0}, {2, 7, 1300.}], 
    Cuboid[{1, 7, 0}, {2, 8, 2000.}], Cuboid[{1, 8, 0}, {2, 9, 3200.}], 
    Cuboid[{1, 9, 0}, {2, 10, 6000.}], Cuboid[{1, 10, 0}, {2, 11, 1270.}]}, 
   {{}, {}, {}, {}, Cuboid[{2, 5, 0}, {3, 6, 1620.}], {}, 
    Cuboid[{2, 7, 0}, {3, 8, 3810.}], Cuboid[{2, 8, 0}, {3, 9, 4602.}], 
    Cuboid[{2, 9, 0}, {3, 10, 13000.}], {}}, 
   {{}, Cuboid[{3, 2, 0}, {4, 3, 2475.}], {}, {}, {}, 
    Cuboid[{3, 6, 0}, {4, 7, 3300.}], {}, {}, {}, {}}, 
   {Cuboid[{4, 1, 0}, {5, 2, 2490.}], Cuboid[{4, 2, 0}, {5, 3, 2100.}], {}, 
    {}, Cuboid[{4, 5, 0}, {5, 6, 3010.}], Cuboid[{4, 6, 0}, {5, 7, 3800.}], 
    Cuboid[{4, 7, 0}, {5, 8, 4140.}], {}, {}, {}}, 
   {{}, Cuboid[{5, 2, 0}, {6, 3, 2280.}], {}, {}, 
    Cuboid[{5, 5, 0}, {6, 6, 3400.}], Cuboid[{5, 6, 0}, {6, 7, 3480.}], 
    Cuboid[{5, 7, 0}, {6, 8, 4560.}], {}, {}, {}}, 
   {Cuboid[{6, 1, 0}, {7, 2, 3155.}], Cuboid[{6, 2, 0}, {7, 3, 2330.}], {}, 
    {}, Cuboid[{6, 5, 0}, {7, 6, 5174.}], Cuboid[{6, 6, 0}, {7, 7, 6190.}], 
    Cuboid[{6, 7, 0}, {7, 8, 5940.}], {}, {}, {}}, 
   {{}, {}, {}, {}, Cuboid[{7, 5, 0}, {8, 6, 4700.}], {}, 
    Cuboid[{7, 7, 0}, {8, 8, 5150.}], {}, {}, {}}, 
   {Cuboid[{8, 1, 0}, {9, 2, 2260.}], Cuboid[{8, 2, 0}, {9, 3, 2130.}], {}, 
    {}, Cuboid[{8, 5, 0}, {9, 6, 4940.}], Cuboid[{8, 6, 0}, {9, 7, 5970.}], 
    Cuboid[{8, 7, 0}, {9, 8, 4910.}], {}, {}, {}}, 
   {{}, {}, {}, {}, Cuboid[{9, 5, 0}, {10, 6, 4825.}], 
    Cuboid[{9, 6, 0}, {10, 7, 4700.}], Cuboid[{9, 7, 0}, {10, 8, 4720.}], {}, 
    {}, {}}, {{}, Cuboid[{10, 2, 0}, {11, 3, 2680.}], {}, {}, 
    Cuboid[{10, 5, 0}, {11, 6, 2680.}], Cuboid[{10, 6, 0}, {11, 7, 3070.}], 
    Cuboid[{10, 7, 0}, {11, 8, 4970.}], {}, {}, {}}, 
   {{}, Cuboid[{11, 2, 0}, {12, 3, 2620.}], {}, {}, 
    Cuboid[{11, 5, 0}, {12, 6, 1740.}], Cuboid[{11, 6, 0}, {12, 7, 2600.}], 
    Cuboid[{11, 7, 0}, {12, 8, 3570.}], {}, {}, {}}, 
   {{}, Cuboid[{12, 2, 0}, {13, 3, 2710.}], {}, {}, 
    Cuboid[{12, 5, 0}, {13, 6, 1407.}], Cuboid[{12, 6, 0}, {13, 7, 2310.}], 
    Cuboid[{12, 7, 0}, {13, 8, 3700.}], {}, {}, {}}, 
   {{}, Cuboid[{13, 2, 0}, {14, 3, 2760.}], {}, {}, 
    Cuboid[{13, 5, 0}, {14, 6, 818.}], Cuboid[{13, 6, 0}, {14, 7, 1215.}], 
    Cuboid[{13, 7, 0}, {14, 8, 2740.}], Cuboid[{13, 8, 0}, {14, 9, 5100.}], 
    Cuboid[{13, 9, 0}, {14, 10, 16200.}], {}}, 
   {{}, Cuboid[{14, 2, 0}, {15, 3, 2830.}], {}, {}, 
    Cuboid[{14, 5, 0}, {15, 6, 1260.}], Cuboid[{14, 6, 0}, {15, 7, 2500.}], 
    Cuboid[{14, 7, 0}, {15, 8, 5400.}], Cuboid[{14, 8, 0}, {15, 9, 2200.}], 
    Cuboid[{14, 9, 0}, {15, 10, 18350.}], {}}, 
   {{}, {}, {}, {}, Cuboid[{15, 5, 0}, {16, 6, 1790.}], 
    Cuboid[{15, 6, 0}, {16, 7, 3420.}], {}, {}, Cuboid[{15, 9, 0}, 
     {16, 10, 333.6}], {}}, {{}, Cuboid[{16, 2, 0}, {17, 3, 1590.}], {}, {}, 
    {}, Cuboid[{16, 6, 0}, {17, 7, 2610.}], Cuboid[{16, 7, 0}, 
     {17, 8, 3350.}], {}, Cuboid[{16, 9, 0}, {17, 10, 317.5}], {}}, 
   {{}, {}, {}, {}, {}, {}, {}, Cuboid[{17, 8, 0}, {18, 9, 206.}], {}, {}}, 
   {{}, {}, {}, {}, {}, Cuboid[{18, 6, 0}, {19, 7, 1090.}], 
    Cuboid[{18, 7, 0}, {19, 8, 1120.}], Cuboid[{18, 8, 0}, {19, 9, 319.}], 
    Cuboid[{18, 9, 0}, {19, 10, 936.}], Cuboid[{18, 10, 0}, 
     {19, 11, 970.}]}}, GrayLevel[0], 
  {{{}, {}, {}, {RGBColor[1, 0, 0], Text["Fr", {1.5, 4.5, 181.44}]}, 
    {RGBColor[1, 0, 0], Text["Cs", {1.5, 5.5, 181.44}]}, 
    {Text["Rb", {1.5, 6.5, 1481.44}], Text["Rb", {1.5, 6.5, -181.44}]}, 
    {Text["K", {1.5, 7.5, 2181.44}], Text["K", {1.5, 7.5, -181.44}]}, 
    {Text["Na", {1.5, 8.5, 3381.44}], Text["Na", {1.5, 8.5, -181.44}]}, 
    {Text["Li", {1.5, 9.5, 6181.44}], Text["Li", {1.5, 9.5, -181.44}]}, 
    {Text["H", {1.5, 10.5, 1451.44}], Text["H", {1.5, 10.5, -181.44}]}}, 
   {{}, {}, {}, {RGBColor[1, 0, 0], Text["Ra", {2.5, 4.5, 181.44}]}, 
    {Text["Ba", {2.5, 5.5, 1801.44}], Text["Ba", {2.5, 5.5, -181.44}]}, 
    {RGBColor[1, 0, 0], Text["Sr", {2.5, 6.5, 181.44}]}, 
    {Text["Ca", {2.5, 7.5, 3991.44}], Text["Ca", {2.5, 7.5, -181.44}]}, 
    {Text["Mg", {2.5, 8.5, 4783.44}], Text["Mg", {2.5, 8.5, -181.44}]}, 
    {Text["Be", {2.5, 9.5, 13181.44}], Text["Be", {2.5, 9.5, -181.44}]}, {}}, 
   {{RGBColor[1, 0, 0], Text["Ac", {3.5, 1.5, 181.44}]}, 
    {Text["La", {3.5, 2.5, 2656.44}], Text["La", {3.5, 2.5, -181.44}]}, {}, 
    {}, {}, {Text["Y", {3.5, 6.5, 3481.44}], Text["Y", {3.5, 6.5, -181.44}]}, 
    {RGBColor[1, 0, 0], Text["Sc", {3.5, 7.5, 181.44}]}, {}, {}, {}}, 
   {{Text["Th", {4.5, 1.5, 2671.44}], Text["Th", {4.5, 1.5, -181.44}]}, 
    {Text["Ce", {4.5, 2.5, 2281.44}], Text["Ce", {4.5, 2.5, -181.44}]}, {}, 
    {RGBColor[1, 0, 0], Text["Rf", {4.5, 4.5, 181.44}]}, 
    {Text["Hf", {4.5, 5.5, 3191.44}], Text["Hf", {4.5, 5.5, -181.44}]}, 
    {Text["Zr", {4.5, 6.5, 3981.44}], Text["Zr", {4.5, 6.5, -181.44}]}, 
    {Text["Ti", {4.5, 7.5, 4321.44}], Text["Ti", {4.5, 7.5, -181.44}]}, {}, 
    {}, {}}, {{RGBColor[1, 0, 0], Text["Pa", {5.5, 1.5, 181.44}]}, 
    {Text["Pr", {5.5, 2.5, 2461.44}], Text["Pr", {5.5, 2.5, -181.44}]}, {}, 
    {RGBColor[1, 0, 0], Text["Db", {5.5, 4.5, 181.44}]}, 
    {Text["Ta", {5.5, 5.5, 3581.44}], Text["Ta", {5.5, 5.5, -181.44}]}, 
    {Text["Nb", {5.5, 6.5, 3661.44}], Text["Nb", {5.5, 6.5, -181.44}]}, 
    {Text["V", {5.5, 7.5, 4741.44}], Text["V", {5.5, 7.5, -181.44}]}, {}, {}, 
    {}}, {{Text["U", {6.5, 1.5, 3336.44}], Text["U", {6.5, 1.5, -181.44}]}, 
    {Text["Nd", {6.5, 2.5, 2511.44}], Text["Nd", {6.5, 2.5, -181.44}]}, {}, 
    {RGBColor[1, 0, 0], Text["Sg", {6.5, 4.5, 181.44}]}, 
    {Text["W", {6.5, 5.5, 5355.44}], Text["W", {6.5, 5.5, -181.44}]}, 
    {Text["Mo", {6.5, 6.5, 6371.44}], Text["Mo", {6.5, 6.5, -181.44}]}, 
    {Text["Cr", {6.5, 7.5, 6121.44}], Text["Cr", {6.5, 7.5, -181.44}]}, {}, 
    {}, {}}, {{RGBColor[1, 0, 0], Text["Np", {7.5, 1.5, 181.44}]}, 
    {RGBColor[1, 0, 0], Text["Pm", {7.5, 2.5, 181.44}]}, {}, 
    {RGBColor[1, 0, 0], Text["Bh", {7.5, 4.5, 181.44}]}, 
    {Text["Re", {7.5, 5.5, 4881.44}], Text["Re", {7.5, 5.5, -181.44}]}, 
    {RGBColor[1, 0, 0], Text["Tc", {7.5, 6.5, 181.44}]}, 
    {Text["Mn", {7.5, 7.5, 5331.44}], Text["Mn", {7.5, 7.5, -181.44}]}, {}, 
    {}, {}}, {{Text["Pu", {8.5, 1.5, 2441.44}], 
     Text["Pu", {8.5, 1.5, -181.44}]}, {Text["Sm", {8.5, 2.5, 2311.44}], 
     Text["Sm", {8.5, 2.5, -181.44}]}, {}, {RGBColor[1, 0, 0], 
     Text["Hs", {8.5, 4.5, 181.44}]}, {Text["Os", {8.5, 5.5, 5121.44}], 
     Text["Os", {8.5, 5.5, -181.44}]}, {Text["Ru", {8.5, 6.5, 6151.44}], 
     Text["Ru", {8.5, 6.5, -181.44}]}, {Text["Fe", {8.5, 7.5, 5091.44}], 
     Text["Fe", {8.5, 7.5, -181.44}]}, {}, {}, {}}, 
   {{RGBColor[1, 0, 0], Text["Am", {9.5, 1.5, 181.44}]}, 
    {RGBColor[1, 0, 0], Text["Eu", {9.5, 2.5, 181.44}]}, {}, 
    {RGBColor[1, 0, 0], Text["Mt", {9.5, 4.5, 181.44}]}, 
    {Text["Ir", {9.5, 5.5, 5006.44}], Text["Ir", {9.5, 5.5, -181.44}]}, 
    {Text["Rh", {9.5, 6.5, 4881.44}], Text["Rh", {9.5, 6.5, -181.44}]}, 
    {Text["Co", {9.5, 7.5, 4901.44}], Text["Co", {9.5, 7.5, -181.44}]}, {}, 
    {}, {}}, {{RGBColor[1, 0, 0], Text["Cm", {10.5, 1.5, 181.44}]}, 
    {Text["Gd", {10.5, 2.5, 2861.44}], Text["Gd", {10.5, 2.5, -181.44}]}, {}, 
    {RGBColor[1, 0, 0], Text["Ds", {10.5, 4.5, 181.44}]}, 
    {Text["Pt", {10.5, 5.5, 2861.44}], Text["Pt", {10.5, 5.5, -181.44}]}, 
    {Text["Pd", {10.5, 6.5, 3251.44}], Text["Pd", {10.5, 6.5, -181.44}]}, 
    {Text["Ni", {10.5, 7.5, 5151.44}], Text["Ni", {10.5, 7.5, -181.44}]}, {}, 
    {}, {}}, {{RGBColor[1, 0, 0], Text["Bk", {11.5, 1.5, 181.44}]}, 
    {Text["Tb", {11.5, 2.5, 2801.44}], Text["Tb", {11.5, 2.5, -181.44}]}, {}, 
    {RGBColor[1, 0, 0], Text["Rg", {11.5, 4.5, 181.44}]}, 
    {Text["Au", {11.5, 5.5, 1921.44}], Text["Au", {11.5, 5.5, -181.44}]}, 
    {Text["Ag", {11.5, 6.5, 2781.44}], Text["Ag", {11.5, 6.5, -181.44}]}, 
    {Text["Cu", {11.5, 7.5, 3751.44}], Text["Cu", {11.5, 7.5, -181.44}]}, {}, 
    {}, {}}, {{RGBColor[1, 0, 0], Text["Cf", {12.5, 1.5, 181.44}]}, 
    {Text["Dy", {12.5, 2.5, 2891.44}], Text["Dy", {12.5, 2.5, -181.44}]}, {}, 
    {RGBColor[1, 0, 0], Text["Uub", {12.5, 4.5, 181.44}]}, 
    {Text["Hg", {12.5, 5.5, 1588.44}], Text["Hg", {12.5, 5.5, -181.44}]}, 
    {Text["Cd", {12.5, 6.5, 2491.44}], Text["Cd", {12.5, 6.5, -181.44}]}, 
    {Text["Zn", {12.5, 7.5, 3881.44}], Text["Zn", {12.5, 7.5, -181.44}]}, {}, 
    {}, {}}, {{RGBColor[1, 0, 0], Text["Es", {13.5, 1.5, 181.44}]}, 
    {Text["Ho", {13.5, 2.5, 2941.44}], Text["Ho", {13.5, 2.5, -181.44}]}, {}, 
    {RGBColor[1, 0, 0], Text["Uut", {13.5, 4.5, 181.44}]}, 
    {Text["Tl", {13.5, 5.5, 999.44}], Text["Tl", {13.5, 5.5, -181.44}]}, 
    {Text["In", {13.5, 6.5, 1396.44}], Text["In", {13.5, 6.5, -181.44}]}, 
    {Text["Ga", {13.5, 7.5, 2921.44}], Text["Ga", {13.5, 7.5, -181.44}]}, 
    {Text["Al", {13.5, 8.5, 5281.44}], Text["Al", {13.5, 8.5, -181.44}]}, 
    {Text["B", {13.5, 9.5, 16381.44}], Text["B", {13.5, 9.5, -181.44}]}, {}}, 
   {{RGBColor[1, 0, 0], Text["Fm", {14.5, 1.5, 181.44}]}, 
    {Text["Er", {14.5, 2.5, 3011.44}], Text["Er", {14.5, 2.5, -181.44}]}, {}, 
    {RGBColor[1, 0, 0], Text["Uuq", {14.5, 4.5, 181.44}]}, 
    {Text["Pb", {14.5, 5.5, 1441.44}], Text["Pb", {14.5, 5.5, -181.44}]}, 
    {Text["Sn", {14.5, 6.5, 2681.44}], Text["Sn", {14.5, 6.5, -181.44}]}, 
    {Text["Ge", {14.5, 7.5, 5581.44}], Text["Ge", {14.5, 7.5, -181.44}]}, 
    {Text["Si", {14.5, 8.5, 2381.44}], Text["Si", {14.5, 8.5, -181.44}]}, 
    {Text["C", {14.5, 9.5, 18531.44}], Text["C", {14.5, 9.5, -181.44}]}, {}}, 
   {{RGBColor[1, 0, 0], Text["Md", {15.5, 1.5, 181.44}]}, 
    {RGBColor[1, 0, 0], Text["Tm", {15.5, 2.5, 181.44}]}, {}, 
    {RGBColor[1, 0, 0], Text["Uup", {15.5, 4.5, 181.44}]}, 
    {Text["Bi", {15.5, 5.5, 1971.44}], Text["Bi", {15.5, 5.5, -181.44}]}, 
    {Text["Sb", {15.5, 6.5, 3601.44}], Text["Sb", {15.5, 6.5, -181.44}]}, 
    {RGBColor[1, 0, 0], Text["As", {15.5, 7.5, 181.44}]}, 
    {RGBColor[1, 0, 0], Text["P", {15.5, 8.5, 181.44}]}, 
    {Text["N", {15.5, 9.5, 515.04}], Text["N", {15.5, 9.5, -181.44}]}, {}}, 
   {{RGBColor[1, 0, 0], Text["No", {16.5, 1.5, 181.44}]}, 
    {Text["Yb", {16.5, 2.5, 1771.44}], Text["Yb", {16.5, 2.5, -181.44}]}, {}, 
    {RGBColor[1, 0, 0], Text["Uuh", {16.5, 4.5, 181.44}]}, 
    {RGBColor[1, 0, 0], Text["Po", {16.5, 5.5, 181.44}]}, 
    {Text["Te", {16.5, 6.5, 2791.44}], Text["Te", {16.5, 6.5, -181.44}]}, 
    {Text["Se", {16.5, 7.5, 3531.44}], Text["Se", {16.5, 7.5, -181.44}]}, 
    {RGBColor[1, 0, 0], Text["S", {16.5, 8.5, 181.44}]}, 
    {Text["O", {16.5, 9.5, 498.94}], Text["O", {16.5, 9.5, -181.44}]}, {}}, 
   {{RGBColor[1, 0, 0], Text["Lr", {17.5, 1.5, 181.44}]}, 
    {RGBColor[1, 0, 0], Text["Lu", {17.5, 2.5, 181.44}]}, {}, 
    {RGBColor[1, 0, 0], Text["Uus", {17.5, 4.5, 181.44}]}, 
    {RGBColor[1, 0, 0], Text["At", {17.5, 5.5, 181.44}]}, 
    {RGBColor[1, 0, 0], Text["I", {17.5, 6.5, 181.44}]}, 
    {RGBColor[1, 0, 0], Text["Br", {17.5, 7.5, 181.44}]}, 
    {Text["Cl", {17.5, 8.5, 387.44}], Text["Cl", {17.5, 8.5, -181.44}]}, 
    {RGBColor[1, 0, 0], Text["F", {17.5, 9.5, 181.44}]}, {}}, 
   {{}, {}, {}, {RGBColor[1, 0, 0], Text["Uuo", {18.5, 4.5, 181.44}]}, 
    {RGBColor[1, 0, 0], Text["Rn", {18.5, 5.5, 181.44}]}, 
    {Text["Xe", {18.5, 6.5, 1271.44}], Text["Xe", {18.5, 6.5, -181.44}]}, 
    {Text["Kr", {18.5, 7.5, 1301.44}], Text["Kr", {18.5, 7.5, -181.44}]}, 
    {Text["Ar", {18.5, 8.5, 500.44}], Text["Ar", {18.5, 8.5, -181.44}]}, 
    {Text["Ne", {18.5, 9.5, 1117.44}], Text["Ne", {18.5, 9.5, -181.44}]}, 
    {Text["He", {18.5, 10.5, 1151.44}], Text["He", 
      {18.5, 10.5, -181.44}]}}}}, 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[1., 1., 1.]], TicksStyle -> Directive[FontFamily -> "Helvetica", 
   FontSize -> 14, RGBColor[1., 1., 1.]], PlotRange -> All, 
 Background -> RGBColor[0, 0, 0]]
