Graphics3D[{{{{}, {}, {}, {}, Cuboid[{1, 5, 0}, {2, 6, 242.}], 
    Cuboid[{1, 6, 0}, {2, 7, 364.}], Cuboid[{1, 7, 0}, {2, 8, 757.}], 
    Cuboid[{1, 8, 0}, {2, 9, 1230.}], Cuboid[{1, 9, 0}, {2, 10, 3570.}], 
    Cuboid[{1, 10, 0}, {2, 11, 14300.}]}, 
   {{}, {}, {}, Cuboid[{2, 4, 0}, {3, 5, 92.}], Cuboid[{2, 5, 0}, 
     {3, 6, 205.}], Cuboid[{2, 6, 0}, {3, 7, 300.}], 
    Cuboid[{2, 7, 0}, {3, 8, 631.}], Cuboid[{2, 8, 0}, {3, 9, 1020.}], 
    Cuboid[{2, 9, 0}, {3, 10, 1820.}], {}}, {Cuboid[{3, 1, 0}, {4, 2, 120.}], 
    Cuboid[{3, 2, 0}, {4, 3, 195.}], {}, {}, {}, 
    Cuboid[{3, 6, 0}, {4, 7, 298.}], Cuboid[{3, 7, 0}, {4, 8, 567.}], {}, {}, 
    {}}, {Cuboid[{4, 1, 0}, {5, 2, 118.}], Cuboid[{4, 2, 0}, {5, 3, 192.}], 
    {}, {}, Cuboid[{4, 5, 0}, {5, 6, 144.}], Cuboid[{4, 6, 0}, {5, 7, 278.}], 
    Cuboid[{4, 7, 0}, {5, 8, 520.}], {}, {}, {}}, 
   {Cuboid[{5, 1, 0}, {6, 2, 99.1}], Cuboid[{5, 2, 0}, {6, 3, 193.}], {}, {}, 
    Cuboid[{5, 5, 0}, {6, 6, 140.}], Cuboid[{5, 6, 0}, {6, 7, 265.}], 
    Cuboid[{5, 7, 0}, {6, 8, 489.}], {}, {}, {}}, 
   {Cuboid[{6, 1, 0}, {7, 2, 116.}], Cuboid[{6, 2, 0}, {7, 3, 190.}], {}, {}, 
    Cuboid[{6, 5, 0}, {7, 6, 132.}], Cuboid[{6, 6, 0}, {7, 7, 251.}], 
    Cuboid[{6, 7, 0}, {7, 8, 448.}], {}, {}, {}}, 
   {{}, {}, {}, {}, Cuboid[{7, 5, 0}, {8, 6, 137.}], 
    Cuboid[{7, 6, 0}, {8, 7, 63.}], Cuboid[{7, 7, 0}, {8, 8, 479.}], {}, {}, 
    {}}, {{}, Cuboid[{8, 2, 0}, {9, 3, 196.}], {}, {}, 
    Cuboid[{8, 5, 0}, {9, 6, 130.}], Cuboid[{8, 6, 0}, {9, 7, 238.}], 
    Cuboid[{8, 7, 0}, {9, 8, 449.}], {}, {}, {}}, 
   {{}, Cuboid[{9, 2, 0}, {10, 3, 182.}], {}, {}, 
    Cuboid[{9, 5, 0}, {10, 6, 131.}], Cuboid[{9, 6, 0}, {10, 7, 240.}], 
    Cuboid[{9, 7, 0}, {10, 8, 421.}], {}, {}, {}}, 
   {{}, Cuboid[{10, 2, 0}, {11, 3, 240.}], {}, {}, 
    Cuboid[{10, 5, 0}, {11, 6, 133.}], Cuboid[{10, 6, 0}, {11, 7, 240.}], 
    Cuboid[{10, 7, 0}, {11, 8, 445.}], {}, {}, {}}, 
   {{}, Cuboid[{11, 2, 0}, {12, 3, 182.}], {}, {}, 
    Cuboid[{11, 5, 0}, {12, 6, 129.1}], Cuboid[{11, 6, 0}, {12, 7, 235.}], 
    Cuboid[{11, 7, 0}, {12, 8, 384.4}], {}, {}, {}}, 
   {{}, Cuboid[{12, 2, 0}, {13, 3, 167.}], {}, {}, 
    Cuboid[{12, 5, 0}, {13, 6, 139.5}], Cuboid[{12, 6, 0}, {13, 7, 230.}], 
    Cuboid[{12, 7, 0}, {13, 8, 388.}], {}, {}, {}}, 
   {{}, Cuboid[{13, 2, 0}, {14, 3, 165.}], {}, {}, 
    Cuboid[{13, 5, 0}, {14, 6, 129.}], Cuboid[{13, 6, 0}, {14, 7, 233.}], 
    Cuboid[{13, 7, 0}, {14, 8, 371.}], Cuboid[{13, 8, 0}, {14, 9, 904.}], 
    Cuboid[{13, 9, 0}, {14, 10, 1030.}], {}}, 
   {{}, Cuboid[{14, 2, 0}, {15, 3, 168.}], {}, {}, 
    Cuboid[{14, 5, 0}, {15, 6, 127.}], Cuboid[{14, 6, 0}, {15, 7, 217.}], 
    Cuboid[{14, 7, 0}, {15, 8, 321.4}], Cuboid[{14, 8, 0}, {15, 9, 710.}], 
    Cuboid[{14, 9, 0}, {15, 10, 710.}], {}}, 
   {{}, Cuboid[{15, 2, 0}, {16, 3, 160.}], {}, {}, 
    Cuboid[{15, 5, 0}, {16, 6, 122.}], Cuboid[{15, 6, 0}, {16, 7, 207.}], 
    Cuboid[{15, 7, 0}, {16, 8, 328.}], Cuboid[{15, 8, 0}, {16, 9, 769.7}], 
    Cuboid[{15, 9, 0}, {16, 10, 1040.}], {}}, 
   {{}, Cuboid[{16, 2, 0}, {17, 3, 154.}], {}, {}, {}, 
    Cuboid[{16, 6, 0}, {17, 7, 201.}], Cuboid[{16, 7, 0}, {17, 8, 321.2}], 
    Cuboid[{16, 8, 0}, {17, 9, 705.}], Cuboid[{16, 9, 0}, {17, 10, 919.}], 
    {}}, {{}, Cuboid[{17, 2, 0}, {18, 3, 154.}], {}, {}, {}, 
    Cuboid[{17, 6, 0}, {18, 7, 429.}], Cuboid[{17, 7, 0}, {18, 8, 947.3}], 
    Cuboid[{17, 8, 0}, {18, 9, 478.2}], Cuboid[{17, 9, 0}, {18, 10, 824.}], 
    {}}, {{}, {}, {}, {}, Cuboid[{18, 5, 0}, {19, 6, 93.65}], 
    Cuboid[{18, 6, 0}, {19, 7, 158.32}], Cuboid[{18, 7, 0}, {19, 8, 248.05}], 
    Cuboid[{18, 8, 0}, {19, 9, 520.33}], Cuboid[{18, 9, 0}, {19, 10, 1030.}], 
    Cuboid[{18, 10, 0}, {19, 11, 5193.1}]}}, GrayLevel[0], 
  {{{}, {}, {}, {RGBColor[1, 0, 0], Text["Fr", {1.5, 4.5, 142.37}]}, 
    {Text["Cs", {1.5, 5.5, 384.37}], Text["Cs", {1.5, 5.5, -142.37}]}, 
    {Text["Rb", {1.5, 6.5, 506.37}], Text["Rb", {1.5, 6.5, -142.37}]}, 
    {Text["K", {1.5, 7.5, 899.37}], Text["K", {1.5, 7.5, -142.37}]}, 
    {Text["Na", {1.5, 8.5, 1372.37}], Text["Na", {1.5, 8.5, -142.37}]}, 
    {Text["Li", {1.5, 9.5, 3712.37}], Text["Li", {1.5, 9.5, -142.37}]}, 
    {Text["H", {1.5, 10.5, 14442.37}], Text["H", {1.5, 10.5, -142.37}]}}, 
   {{}, {}, {}, {Text["Ra", {2.5, 4.5, 234.37}], 
     Text["Ra", {2.5, 4.5, -142.37}]}, {Text["Ba", {2.5, 5.5, 347.37}], 
     Text["Ba", {2.5, 5.5, -142.37}]}, {Text["Sr", {2.5, 6.5, 442.37}], 
     Text["Sr", {2.5, 6.5, -142.37}]}, {Text["Ca", {2.5, 7.5, 773.37}], 
     Text["Ca", {2.5, 7.5, -142.37}]}, {Text["Mg", {2.5, 8.5, 1162.37}], 
     Text["Mg", {2.5, 8.5, -142.37}]}, {Text["Be", {2.5, 9.5, 1962.37}], 
     Text["Be", {2.5, 9.5, -142.37}]}, {}}, 
   {{Text["Ac", {3.5, 1.5, 262.37}], Text["Ac", {3.5, 1.5, -142.37}]}, 
    {Text["La", {3.5, 2.5, 337.37}], Text["La", {3.5, 2.5, -142.37}]}, {}, 
    {}, {}, {Text["Y", {3.5, 6.5, 440.37}], Text["Y", {3.5, 6.5, -142.37}]}, 
    {Text["Sc", {3.5, 7.5, 709.37}], Text["Sc", {3.5, 7.5, -142.37}]}, {}, 
    {}, {}}, {{Text["Th", {4.5, 1.5, 260.37}], 
     Text["Th", {4.5, 1.5, -142.37}]}, {Text["Ce", {4.5, 2.5, 334.37}], 
     Text["Ce", {4.5, 2.5, -142.37}]}, {}, {RGBColor[1, 0, 0], 
     Text["Rf", {4.5, 4.5, 142.37}]}, {Text["Hf", {4.5, 5.5, 286.37}], 
     Text["Hf", {4.5, 5.5, -142.37}]}, {Text["Zr", {4.5, 6.5, 420.37}], 
     Text["Zr", {4.5, 6.5, -142.37}]}, {Text["Ti", {4.5, 7.5, 662.37}], 
     Text["Ti", {4.5, 7.5, -142.37}]}, {}, {}, {}}, 
   {{Text["Pa", {5.5, 1.5, 241.47}], Text["Pa", {5.5, 1.5, -142.37}]}, 
    {Text["Pr", {5.5, 2.5, 335.37}], Text["Pr", {5.5, 2.5, -142.37}]}, {}, 
    {RGBColor[1, 0, 0], Text["Db", {5.5, 4.5, 142.37}]}, 
    {Text["Ta", {5.5, 5.5, 282.37}], Text["Ta", {5.5, 5.5, -142.37}]}, 
    {Text["Nb", {5.5, 6.5, 407.37}], Text["Nb", {5.5, 6.5, -142.37}]}, 
    {Text["V", {5.5, 7.5, 631.37}], Text["V", {5.5, 7.5, -142.37}]}, {}, {}, 
    {}}, {{Text["U", {6.5, 1.5, 258.37}], Text["U", {6.5, 1.5, -142.37}]}, 
    {Text["Nd", {6.5, 2.5, 332.37}], Text["Nd", {6.5, 2.5, -142.37}]}, {}, 
    {RGBColor[1, 0, 0], Text["Sg", {6.5, 4.5, 142.37}]}, 
    {Text["W", {6.5, 5.5, 274.37}], Text["W", {6.5, 5.5, -142.37}]}, 
    {Text["Mo", {6.5, 6.5, 393.37}], Text["Mo", {6.5, 6.5, -142.37}]}, 
    {Text["Cr", {6.5, 7.5, 590.37}], Text["Cr", {6.5, 7.5, -142.37}]}, {}, 
    {}, {}}, {{RGBColor[1, 0, 0], Text["Np", {7.5, 1.5, 142.37}]}, 
    {RGBColor[1, 0, 0], Text["Pm", {7.5, 2.5, 142.37}]}, {}, 
    {RGBColor[1, 0, 0], Text["Bh", {7.5, 4.5, 142.37}]}, 
    {Text["Re", {7.5, 5.5, 279.37}], Text["Re", {7.5, 5.5, -142.37}]}, 
    {Text["Tc", {7.5, 6.5, 205.37}], Text["Tc", {7.5, 6.5, -142.37}]}, 
    {Text["Mn", {7.5, 7.5, 621.37}], Text["Mn", {7.5, 7.5, -142.37}]}, {}, 
    {}, {}}, {{RGBColor[1, 0, 0], Text["Pu", {8.5, 1.5, 142.37}]}, 
    {Text["Sm", {8.5, 2.5, 338.37}], Text["Sm", {8.5, 2.5, -142.37}]}, {}, 
    {RGBColor[1, 0, 0], Text["Hs", {8.5, 4.5, 142.37}]}, 
    {Text["Os", {8.5, 5.5, 272.37}], Text["Os", {8.5, 5.5, -142.37}]}, 
    {Text["Ru", {8.5, 6.5, 380.37}], Text["Ru", {8.5, 6.5, -142.37}]}, 
    {Text["Fe", {8.5, 7.5, 591.37}], Text["Fe", {8.5, 7.5, -142.37}]}, {}, 
    {}, {}}, {{RGBColor[1, 0, 0], Text["Am", {9.5, 1.5, 142.37}]}, 
    {Text["Eu", {9.5, 2.5, 324.37}], Text["Eu", {9.5, 2.5, -142.37}]}, {}, 
    {RGBColor[1, 0, 0], Text["Mt", {9.5, 4.5, 142.37}]}, 
    {Text["Ir", {9.5, 5.5, 273.37}], Text["Ir", {9.5, 5.5, -142.37}]}, 
    {Text["Rh", {9.5, 6.5, 382.37}], Text["Rh", {9.5, 6.5, -142.37}]}, 
    {Text["Co", {9.5, 7.5, 563.37}], Text["Co", {9.5, 7.5, -142.37}]}, {}, 
    {}, {}}, {{RGBColor[1, 0, 0], Text["Cm", {10.5, 1.5, 142.37}]}, 
    {Text["Gd", {10.5, 2.5, 382.37}], Text["Gd", {10.5, 2.5, -142.37}]}, {}, 
    {RGBColor[1, 0, 0], Text["Ds", {10.5, 4.5, 142.37}]}, 
    {Text["Pt", {10.5, 5.5, 275.37}], Text["Pt", {10.5, 5.5, -142.37}]}, 
    {Text["Pd", {10.5, 6.5, 382.37}], Text["Pd", {10.5, 6.5, -142.37}]}, 
    {Text["Ni", {10.5, 7.5, 587.37}], Text["Ni", {10.5, 7.5, -142.37}]}, {}, 
    {}, {}}, {{RGBColor[1, 0, 0], Text["Bk", {11.5, 1.5, 142.37}]}, 
    {Text["Tb", {11.5, 2.5, 324.37}], Text["Tb", {11.5, 2.5, -142.37}]}, {}, 
    {RGBColor[1, 0, 0], Text["Rg", {11.5, 4.5, 142.37}]}, 
    {Text["Au", {11.5, 5.5, 271.47}], Text["Au", {11.5, 5.5, -142.37}]}, 
    {Text["Ag", {11.5, 6.5, 377.37}], Text["Ag", {11.5, 6.5, -142.37}]}, 
    {Text["Cu", {11.5, 7.5, 526.77}], Text["Cu", {11.5, 7.5, -142.37}]}, {}, 
    {}, {}}, {{RGBColor[1, 0, 0], Text["Cf", {12.5, 1.5, 142.37}]}, 
    {Text["Dy", {12.5, 2.5, 309.37}], Text["Dy", {12.5, 2.5, -142.37}]}, {}, 
    {RGBColor[1, 0, 0], Text["Uub", {12.5, 4.5, 142.37}]}, 
    {Text["Hg", {12.5, 5.5, 281.87}], Text["Hg", {12.5, 5.5, -142.37}]}, 
    {Text["Cd", {12.5, 6.5, 372.37}], Text["Cd", {12.5, 6.5, -142.37}]}, 
    {Text["Zn", {12.5, 7.5, 530.37}], Text["Zn", {12.5, 7.5, -142.37}]}, {}, 
    {}, {}}, {{RGBColor[1, 0, 0], Text["Es", {13.5, 1.5, 142.37}]}, 
    {Text["Ho", {13.5, 2.5, 307.37}], Text["Ho", {13.5, 2.5, -142.37}]}, {}, 
    {RGBColor[1, 0, 0], Text["Uut", {13.5, 4.5, 142.37}]}, 
    {Text["Tl", {13.5, 5.5, 271.37}], Text["Tl", {13.5, 5.5, -142.37}]}, 
    {Text["In", {13.5, 6.5, 375.37}], Text["In", {13.5, 6.5, -142.37}]}, 
    {Text["Ga", {13.5, 7.5, 513.37}], Text["Ga", {13.5, 7.5, -142.37}]}, 
    {Text["Al", {13.5, 8.5, 1046.37}], Text["Al", {13.5, 8.5, -142.37}]}, 
    {Text["B", {13.5, 9.5, 1172.37}], Text["B", {13.5, 9.5, -142.37}]}, {}}, 
   {{RGBColor[1, 0, 0], Text["Fm", {14.5, 1.5, 142.37}]}, 
    {Text["Er", {14.5, 2.5, 310.37}], Text["Er", {14.5, 2.5, -142.37}]}, {}, 
    {RGBColor[1, 0, 0], Text["Uuq", {14.5, 4.5, 142.37}]}, 
    {Text["Pb", {14.5, 5.5, 269.37}], Text["Pb", {14.5, 5.5, -142.37}]}, 
    {Text["Sn", {14.5, 6.5, 359.37}], Text["Sn", {14.5, 6.5, -142.37}]}, 
    {Text["Ge", {14.5, 7.5, 463.77}], Text["Ge", {14.5, 7.5, -142.37}]}, 
    {Text["Si", {14.5, 8.5, 852.37}], Text["Si", {14.5, 8.5, -142.37}]}, 
    {Text["C", {14.5, 9.5, 852.37}], Text["C", {14.5, 9.5, -142.37}]}, {}}, 
   {{RGBColor[1, 0, 0], Text["Md", {15.5, 1.5, 142.37}]}, 
    {Text["Tm", {15.5, 2.5, 302.37}], Text["Tm", {15.5, 2.5, -142.37}]}, {}, 
    {RGBColor[1, 0, 0], Text["Uup", {15.5, 4.5, 142.37}]}, 
    {Text["Bi", {15.5, 5.5, 264.37}], Text["Bi", {15.5, 5.5, -142.37}]}, 
    {Text["Sb", {15.5, 6.5, 349.37}], Text["Sb", {15.5, 6.5, -142.37}]}, 
    {Text["As", {15.5, 7.5, 470.37}], Text["As", {15.5, 7.5, -142.37}]}, 
    {Text["P", {15.5, 8.5, 912.07}], Text["P", {15.5, 8.5, -142.37}]}, 
    {Text["N", {15.5, 9.5, 1182.37}], Text["N", {15.5, 9.5, -142.37}]}, {}}, 
   {{RGBColor[1, 0, 0], Text["No", {16.5, 1.5, 142.37}]}, 
    {Text["Yb", {16.5, 2.5, 296.37}], Text["Yb", {16.5, 2.5, -142.37}]}, {}, 
    {RGBColor[1, 0, 0], Text["Uuh", {16.5, 4.5, 142.37}]}, 
    {RGBColor[1, 0, 0], Text["Po", {16.5, 5.5, 142.37}]}, 
    {Text["Te", {16.5, 6.5, 343.37}], Text["Te", {16.5, 6.5, -142.37}]}, 
    {Text["Se", {16.5, 7.5, 463.57}], Text["Se", {16.5, 7.5, -142.37}]}, 
    {Text["S", {16.5, 8.5, 847.37}], Text["S", {16.5, 8.5, -142.37}]}, 
    {Text["O", {16.5, 9.5, 1061.37}], Text["O", {16.5, 9.5, -142.37}]}, {}}, 
   {{RGBColor[1, 0, 0], Text["Lr", {17.5, 1.5, 142.37}]}, 
    {Text["Lu", {17.5, 2.5, 296.37}], Text["Lu", {17.5, 2.5, -142.37}]}, {}, 
    {RGBColor[1, 0, 0], Text["Uus", {17.5, 4.5, 142.37}]}, 
    {RGBColor[1, 0, 0], Text["At", {17.5, 5.5, 142.37}]}, 
    {Text["I", {17.5, 6.5, 571.37}], Text["I", {17.5, 6.5, -142.37}]}, 
    {Text["Br", {17.5, 7.5, 1089.67}], Text["Br", {17.5, 7.5, -142.37}]}, 
    {Text["Cl", {17.5, 8.5, 620.5699999999999}], 
     Text["Cl", {17.5, 8.5, -142.37}]}, {Text["F", {17.5, 9.5, 966.37}], 
     Text["F", {17.5, 9.5, -142.37}]}, {}}, 
   {{}, {}, {}, {RGBColor[1, 0, 0], Text["Uuo", {18.5, 4.5, 142.37}]}, 
    {Text["Rn", {18.5, 5.5, 236.02}], Text["Rn", {18.5, 5.5, -142.37}]}, 
    {Text["Xe", {18.5, 6.5, 300.69}], Text["Xe", {18.5, 6.5, -142.37}]}, 
    {Text["Kr", {18.5, 7.5, 390.42}], Text["Kr", {18.5, 7.5, -142.37}]}, 
    {Text["Ar", {18.5, 8.5, 662.7}], Text["Ar", {18.5, 8.5, -142.37}]}, 
    {Text["Ne", {18.5, 9.5, 1172.37}], Text["Ne", {18.5, 9.5, -142.37}]}, 
    {Text["He", {18.5, 10.5, 5335.47}], Text["He", 
      {18.5, 10.5, -142.37}]}}}}, 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[1., 1., 1.]]
