Graphics3D[{{{{}, {}, {}, Cuboid[{1, 4, 0}, {2, 5, 65.}], 
    Cuboid[{1, 5, 0}, {2, 6, 65.}], Cuboid[{1, 6, 0}, {2, 7, 72.}], 
    Cuboid[{1, 7, 0}, {2, 8, 76.9}], Cuboid[{1, 8, 0}, {2, 9, 97.7}], 
    Cuboid[{1, 9, 0}, {2, 10, 147.}], Cuboid[{1, 10, 0}, {2, 11, 0.452}]}, 
   {{}, {}, {}, Cuboid[{2, 4, 0}, {3, 5, 125.}], 
    Cuboid[{2, 5, 0}, {3, 6, 140.}], Cuboid[{2, 6, 0}, {3, 7, 137.}], 
    Cuboid[{2, 7, 0}, {3, 8, 155.}], Cuboid[{2, 8, 0}, {3, 9, 128.}], 
    Cuboid[{2, 9, 0}, {3, 10, 297.}], {}}, {Cuboid[{3, 1, 0}, {4, 2, 400.}], 
    Cuboid[{3, 2, 0}, {4, 3, 400.}], {}, {}, {}, 
    Cuboid[{3, 6, 0}, {4, 7, 380.}], Cuboid[{3, 7, 0}, {4, 8, 318.}], {}, {}, 
    {}}, {Cuboid[{4, 1, 0}, {5, 2, 530.}], Cuboid[{4, 2, 0}, {5, 3, 350.}], 
    {}, {}, Cuboid[{4, 5, 0}, {5, 6, 630.}], Cuboid[{4, 6, 0}, {5, 7, 580.}], 
    Cuboid[{4, 7, 0}, {5, 8, 425.}], {}, {}, {}}, 
   {Cuboid[{5, 1, 0}, {6, 2, 470.}], Cuboid[{5, 2, 0}, {6, 3, 330.}], {}, {}, 
    Cuboid[{5, 5, 0}, {6, 6, 735.}], Cuboid[{5, 6, 0}, {6, 7, 690.}], 
    Cuboid[{5, 7, 0}, {6, 8, 453.}], {}, {}, {}}, 
   {Cuboid[{6, 1, 0}, {7, 2, 420.}], Cuboid[{6, 2, 0}, {7, 3, 285.}], {}, {}, 
    Cuboid[{6, 5, 0}, {7, 6, 800.}], Cuboid[{6, 6, 0}, {7, 7, 600.}], 
    Cuboid[{6, 7, 0}, {7, 8, 339.}], {}, {}, {}}, 
   {Cuboid[{7, 1, 0}, {8, 2, 335.}], Cuboid[{7, 2, 0}, {8, 3, 290.}], {}, {}, 
    Cuboid[{7, 5, 0}, {8, 6, 705.}], Cuboid[{7, 6, 0}, {8, 7, 550.}], 
    Cuboid[{7, 7, 0}, {8, 8, 220.}], {}, {}, {}}, 
   {Cuboid[{8, 1, 0}, {9, 2, 325.}], Cuboid[{8, 2, 0}, {9, 3, 175.}], {}, {}, 
    Cuboid[{8, 5, 0}, {9, 6, 630.}], Cuboid[{8, 6, 0}, {9, 7, 580.}], 
    Cuboid[{8, 7, 0}, {9, 8, 347.}], {}, {}, {}}, 
   {{}, Cuboid[{9, 2, 0}, {10, 3, 175.}], {}, {}, 
    Cuboid[{9, 5, 0}, {10, 6, 560.}], Cuboid[{9, 6, 0}, {10, 7, 495.}], 
    Cuboid[{9, 7, 0}, {10, 8, 375.}], {}, {}, {}}, 
   {{}, Cuboid[{10, 2, 0}, {11, 3, 305.}], {}, {}, 
    Cuboid[{10, 5, 0}, {11, 6, 490.}], Cuboid[{10, 6, 0}, {11, 7, 380.}], 
    Cuboid[{10, 7, 0}, {11, 8, 378.}], {}, {}, {}}, 
   {{}, Cuboid[{11, 2, 0}, {12, 3, 295.}], {}, {}, 
    Cuboid[{11, 5, 0}, {12, 6, 330.}], Cuboid[{11, 6, 0}, {12, 7, 255.}], 
    Cuboid[{11, 7, 0}, {12, 8, 300.}], {}, {}, {}}, 
   {{}, Cuboid[{12, 2, 0}, {13, 3, 280.}], {}, {}, 
    Cuboid[{12, 5, 0}, {13, 6, 59.2}], Cuboid[{12, 6, 0}, {13, 7, 100.}], 
    Cuboid[{12, 7, 0}, {13, 8, 119.}], {}, {}, {}}, 
   {{}, Cuboid[{13, 2, 0}, {14, 3, 265.}], {}, {}, 
    Cuboid[{13, 5, 0}, {14, 6, 165.}], Cuboid[{13, 6, 0}, {14, 7, 230.}], 
    Cuboid[{13, 7, 0}, {14, 8, 256.}], Cuboid[{13, 8, 0}, {14, 9, 293.}], 
    Cuboid[{13, 9, 0}, {14, 10, 507.}], {}}, 
   {{}, Cuboid[{14, 2, 0}, {15, 3, 285.}], {}, {}, 
    Cuboid[{14, 5, 0}, {15, 6, 178.}], Cuboid[{14, 6, 0}, {15, 7, 290.}], 
    Cuboid[{14, 7, 0}, {15, 8, 334.}], Cuboid[{14, 8, 0}, {15, 9, 359.}], 
    Cuboid[{14, 9, 0}, {15, 10, 715.}], {}}, 
   {{}, Cuboid[{15, 2, 0}, {16, 3, 250.}], {}, {}, 
    Cuboid[{15, 5, 0}, {16, 6, 160.}], Cuboid[{15, 6, 0}, {16, 7, 68.}], 
    Cuboid[{15, 7, 0}, {16, 8, 32.4}], Cuboid[{15, 8, 0}, {16, 9, 12.4}], 
    Cuboid[{15, 9, 0}, {16, 10, 2.79}], {}}, 
   {{}, Cuboid[{16, 2, 0}, {17, 3, 160.}], {}, {}, 
    Cuboid[{16, 5, 0}, {17, 6, 100.}], Cuboid[{16, 6, 0}, {17, 7, 48.}], 
    Cuboid[{16, 7, 0}, {17, 8, 26.}], Cuboid[{16, 8, 0}, {17, 9, 9.8}], 
    Cuboid[{16, 9, 0}, {17, 10, 3.41}], {}}, 
   {{}, Cuboid[{17, 2, 0}, {18, 3, 415.}], {}, {}, 
    Cuboid[{17, 5, 0}, {18, 6, 40.}], Cuboid[{17, 6, 0}, {18, 7, 20.9}], 
    Cuboid[{17, 7, 0}, {18, 8, 14.8}], Cuboid[{17, 8, 0}, {18, 9, 10.2}], 
    Cuboid[{17, 9, 0}, {18, 10, 3.27}], {}}, {{}, {}, {}, {}, 
    Cuboid[{18, 5, 0}, {19, 6, 17.}], Cuboid[{18, 6, 0}, {19, 7, 12.64}], 
    Cuboid[{18, 7, 0}, {19, 8, 9.02}], Cuboid[{18, 8, 0}, {19, 9, 6.5}], 
    Cuboid[{18, 9, 0}, {19, 10, 1.75}], Cuboid[{18, 10, 0}, 
     {19, 11, 0.083}]}}, GrayLevel[0], 
  {{{}, {}, {}, {Text["Fr", {1.5, 4.5, 72.99917}], 
     Text["Fr", {1.5, 4.5, -7.99917}]}, {Text["Cs", {1.5, 5.5, 72.99917}], 
     Text["Cs", {1.5, 5.5, -7.99917}]}, {Text["Rb", {1.5, 6.5, 79.99917}], 
     Text["Rb", {1.5, 6.5, -7.99917}]}, 
    {Text["K", {1.5, 7.5, 84.89917000000001}], 
     Text["K", {1.5, 7.5, -7.99917}]}, 
    {Text["Na", {1.5, 8.5, 105.69917000000001}], 
     Text["Na", {1.5, 8.5, -7.99917}]}, {Text["Li", {1.5, 9.5, 154.99917}], 
     Text["Li", {1.5, 9.5, -7.99917}]}, 
    {Text["H", {1.5, 10.5, 8.451170000000001}], 
     Text["H", {1.5, 10.5, -7.99917}]}}, 
   {{}, {}, {}, {Text["Ra", {2.5, 4.5, 132.99917}], 
     Text["Ra", {2.5, 4.5, -7.99917}]}, {Text["Ba", {2.5, 5.5, 147.99917}], 
     Text["Ba", {2.5, 5.5, -7.99917}]}, {Text["Sr", {2.5, 6.5, 144.99917}], 
     Text["Sr", {2.5, 6.5, -7.99917}]}, {Text["Ca", {2.5, 7.5, 162.99917}], 
     Text["Ca", {2.5, 7.5, -7.99917}]}, {Text["Mg", {2.5, 8.5, 135.99917}], 
     Text["Mg", {2.5, 8.5, -7.99917}]}, {Text["Be", {2.5, 9.5, 304.99917}], 
     Text["Be", {2.5, 9.5, -7.99917}]}, {}}, 
   {{Text["Ac", {3.5, 1.5, 407.99917}], Text["Ac", {3.5, 1.5, -7.99917}]}, 
    {Text["La", {3.5, 2.5, 407.99917}], Text["La", {3.5, 2.5, -7.99917}]}, 
    {}, {}, {}, {Text["Y", {3.5, 6.5, 387.99917}], 
     Text["Y", {3.5, 6.5, -7.99917}]}, {Text["Sc", {3.5, 7.5, 325.99917}], 
     Text["Sc", {3.5, 7.5, -7.99917}]}, {}, {}, {}}, 
   {{Text["Th", {4.5, 1.5, 537.99917}], Text["Th", {4.5, 1.5, -7.99917}]}, 
    {Text["Ce", {4.5, 2.5, 357.99917}], Text["Ce", {4.5, 2.5, -7.99917}]}, 
    {}, {RGBColor[1, 0, 0], Text["Rf", {4.5, 4.5, 7.99917}]}, 
    {Text["Hf", {4.5, 5.5, 637.99917}], Text["Hf", {4.5, 5.5, -7.99917}]}, 
    {Text["Zr", {4.5, 6.5, 587.99917}], Text["Zr", {4.5, 6.5, -7.99917}]}, 
    {Text["Ti", {4.5, 7.5, 432.99917}], Text["Ti", {4.5, 7.5, -7.99917}]}, 
    {}, {}, {}}, {{Text["Pa", {5.5, 1.5, 477.99917}], 
     Text["Pa", {5.5, 1.5, -7.99917}]}, {Text["Pr", {5.5, 2.5, 337.99917}], 
     Text["Pr", {5.5, 2.5, -7.99917}]}, {}, {RGBColor[1, 0, 0], 
     Text["Db", {5.5, 4.5, 7.99917}]}, {Text["Ta", {5.5, 5.5, 742.99917}], 
     Text["Ta", {5.5, 5.5, -7.99917}]}, {Text["Nb", {5.5, 6.5, 697.99917}], 
     Text["Nb", {5.5, 6.5, -7.99917}]}, {Text["V", {5.5, 7.5, 460.99917}], 
     Text["V", {5.5, 7.5, -7.99917}]}, {}, {}, {}}, 
   {{Text["U", {6.5, 1.5, 427.99917}], Text["U", {6.5, 1.5, -7.99917}]}, 
    {Text["Nd", {6.5, 2.5, 292.99917}], Text["Nd", {6.5, 2.5, -7.99917}]}, 
    {}, {RGBColor[1, 0, 0], Text["Sg", {6.5, 4.5, 7.99917}]}, 
    {Text["W", {6.5, 5.5, 807.99917}], Text["W", {6.5, 5.5, -7.99917}]}, 
    {Text["Mo", {6.5, 6.5, 607.99917}], Text["Mo", {6.5, 6.5, -7.99917}]}, 
    {Text["Cr", {6.5, 7.5, 346.99917}], Text["Cr", {6.5, 7.5, -7.99917}]}, 
    {}, {}, {}}, {{Text["Np", {7.5, 1.5, 342.99917}], 
     Text["Np", {7.5, 1.5, -7.99917}]}, {Text["Pm", {7.5, 2.5, 297.99917}], 
     Text["Pm", {7.5, 2.5, -7.99917}]}, {}, {RGBColor[1, 0, 0], 
     Text["Bh", {7.5, 4.5, 7.99917}]}, {Text["Re", {7.5, 5.5, 712.99917}], 
     Text["Re", {7.5, 5.5, -7.99917}]}, {Text["Tc", {7.5, 6.5, 557.99917}], 
     Text["Tc", {7.5, 6.5, -7.99917}]}, {Text["Mn", {7.5, 7.5, 227.99917}], 
     Text["Mn", {7.5, 7.5, -7.99917}]}, {}, {}, {}}, 
   {{Text["Pu", {8.5, 1.5, 332.99917}], Text["Pu", {8.5, 1.5, -7.99917}]}, 
    {Text["Sm", {8.5, 2.5, 182.99917}], Text["Sm", {8.5, 2.5, -7.99917}]}, 
    {}, {RGBColor[1, 0, 0], Text["Hs", {8.5, 4.5, 7.99917}]}, 
    {Text["Os", {8.5, 5.5, 637.99917}], Text["Os", {8.5, 5.5, -7.99917}]}, 
    {Text["Ru", {8.5, 6.5, 587.99917}], Text["Ru", {8.5, 6.5, -7.99917}]}, 
    {Text["Fe", {8.5, 7.5, 354.99917}], Text["Fe", {8.5, 7.5, -7.99917}]}, 
    {}, {}, {}}, {{RGBColor[1, 0, 0], Text["Am", {9.5, 1.5, 7.99917}]}, 
    {Text["Eu", {9.5, 2.5, 182.99917}], Text["Eu", {9.5, 2.5, -7.99917}]}, 
    {}, {RGBColor[1, 0, 0], Text["Mt", {9.5, 4.5, 7.99917}]}, 
    {Text["Ir", {9.5, 5.5, 567.99917}], Text["Ir", {9.5, 5.5, -7.99917}]}, 
    {Text["Rh", {9.5, 6.5, 502.99917}], Text["Rh", {9.5, 6.5, -7.99917}]}, 
    {Text["Co", {9.5, 7.5, 382.99917}], Text["Co", {9.5, 7.5, -7.99917}]}, 
    {}, {}, {}}, {{RGBColor[1, 0, 0], Text["Cm", {10.5, 1.5, 7.99917}]}, 
    {Text["Gd", {10.5, 2.5, 312.99917}], Text["Gd", {10.5, 2.5, -7.99917}]}, 
    {}, {RGBColor[1, 0, 0], Text["Ds", {10.5, 4.5, 7.99917}]}, 
    {Text["Pt", {10.5, 5.5, 497.99917}], Text["Pt", {10.5, 5.5, -7.99917}]}, 
    {Text["Pd", {10.5, 6.5, 387.99917}], Text["Pd", {10.5, 6.5, -7.99917}]}, 
    {Text["Ni", {10.5, 7.5, 385.99917}], Text["Ni", {10.5, 7.5, -7.99917}]}, 
    {}, {}, {}}, {{RGBColor[1, 0, 0], Text["Bk", {11.5, 1.5, 7.99917}]}, 
    {Text["Tb", {11.5, 2.5, 302.99917}], Text["Tb", {11.5, 2.5, -7.99917}]}, 
    {}, {RGBColor[1, 0, 0], Text["Rg", {11.5, 4.5, 7.99917}]}, 
    {Text["Au", {11.5, 5.5, 337.99917}], Text["Au", {11.5, 5.5, -7.99917}]}, 
    {Text["Ag", {11.5, 6.5, 262.99917}], Text["Ag", {11.5, 6.5, -7.99917}]}, 
    {Text["Cu", {11.5, 7.5, 307.99917}], Text["Cu", {11.5, 7.5, -7.99917}]}, 
    {}, {}, {}}, {{RGBColor[1, 0, 0], Text["Cf", {12.5, 1.5, 7.99917}]}, 
    {Text["Dy", {12.5, 2.5, 287.99917}], Text["Dy", {12.5, 2.5, -7.99917}]}, 
    {}, {RGBColor[1, 0, 0], Text["Uub", {12.5, 4.5, 7.99917}]}, 
    {Text["Hg", {12.5, 5.5, 67.19917000000001}], 
     Text["Hg", {12.5, 5.5, -7.99917}]}, {Text["Cd", {12.5, 6.5, 107.99917}], 
     Text["Cd", {12.5, 6.5, -7.99917}]}, {Text["Zn", {12.5, 7.5, 126.99917}], 
     Text["Zn", {12.5, 7.5, -7.99917}]}, {}, {}, {}}, 
   {{RGBColor[1, 0, 0], Text["Es", {13.5, 1.5, 7.99917}]}, 
    {Text["Ho", {13.5, 2.5, 272.99917}], Text["Ho", {13.5, 2.5, -7.99917}]}, 
    {}, {RGBColor[1, 0, 0], Text["Uut", {13.5, 4.5, 7.99917}]}, 
    {Text["Tl", {13.5, 5.5, 172.99917}], Text["Tl", {13.5, 5.5, -7.99917}]}, 
    {Text["In", {13.5, 6.5, 237.99917}], Text["In", {13.5, 6.5, -7.99917}]}, 
    {Text["Ga", {13.5, 7.5, 263.99917}], Text["Ga", {13.5, 7.5, -7.99917}]}, 
    {Text["Al", {13.5, 8.5, 300.99917}], Text["Al", {13.5, 8.5, -7.99917}]}, 
    {Text["B", {13.5, 9.5, 514.99917}], Text["B", {13.5, 9.5, -7.99917}]}, 
    {}}, {{RGBColor[1, 0, 0], Text["Fm", {14.5, 1.5, 7.99917}]}, 
    {Text["Er", {14.5, 2.5, 292.99917}], Text["Er", {14.5, 2.5, -7.99917}]}, 
    {}, {RGBColor[1, 0, 0], Text["Uuq", {14.5, 4.5, 7.99917}]}, 
    {Text["Pb", {14.5, 5.5, 185.99917}], Text["Pb", {14.5, 5.5, -7.99917}]}, 
    {Text["Sn", {14.5, 6.5, 297.99917}], Text["Sn", {14.5, 6.5, -7.99917}]}, 
    {Text["Ge", {14.5, 7.5, 341.99917}], Text["Ge", {14.5, 7.5, -7.99917}]}, 
    {Text["Si", {14.5, 8.5, 366.99917}], Text["Si", {14.5, 8.5, -7.99917}]}, 
    {Text["C", {14.5, 9.5, 722.99917}], Text["C", {14.5, 9.5, -7.99917}]}, 
    {}}, {{RGBColor[1, 0, 0], Text["Md", {15.5, 1.5, 7.99917}]}, 
    {Text["Tm", {15.5, 2.5, 257.99917}], Text["Tm", {15.5, 2.5, -7.99917}]}, 
    {}, {RGBColor[1, 0, 0], Text["Uup", {15.5, 4.5, 7.99917}]}, 
    {Text["Bi", {15.5, 5.5, 167.99917}], Text["Bi", {15.5, 5.5, -7.99917}]}, 
    {Text["Sb", {15.5, 6.5, 75.99917}], Text["Sb", {15.5, 6.5, -7.99917}]}, 
    {Text["As", {15.5, 7.5, 40.39917}], Text["As", {15.5, 7.5, -7.99917}]}, 
    {Text["P", {15.5, 8.5, 20.39917}], Text["P", {15.5, 8.5, -7.99917}]}, 
    {Text["N", {15.5, 9.5, 10.78917}], Text["N", {15.5, 9.5, -7.99917}]}, 
    {}}, {{RGBColor[1, 0, 0], Text["No", {16.5, 1.5, 7.99917}]}, 
    {Text["Yb", {16.5, 2.5, 167.99917}], Text["Yb", {16.5, 2.5, -7.99917}]}, 
    {}, {RGBColor[1, 0, 0], Text["Uuh", {16.5, 4.5, 7.99917}]}, 
    {Text["Po", {16.5, 5.5, 107.99917}], Text["Po", {16.5, 5.5, -7.99917}]}, 
    {Text["Te", {16.5, 6.5, 55.99917}], Text["Te", {16.5, 6.5, -7.99917}]}, 
    {Text["Se", {16.5, 7.5, 33.99917}], Text["Se", {16.5, 7.5, -7.99917}]}, 
    {Text["S", {16.5, 8.5, 17.79917}], Text["S", {16.5, 8.5, -7.99917}]}, 
    {Text["O", {16.5, 9.5, 11.40917}], Text["O", {16.5, 9.5, -7.99917}]}, 
    {}}, {{RGBColor[1, 0, 0], Text["Lr", {17.5, 1.5, 7.99917}]}, 
    {Text["Lu", {17.5, 2.5, 422.99917}], Text["Lu", {17.5, 2.5, -7.99917}]}, 
    {}, {RGBColor[1, 0, 0], Text["Uus", {17.5, 4.5, 7.99917}]}, 
    {Text["At", {17.5, 5.5, 47.99917}], Text["At", {17.5, 5.5, -7.99917}]}, 
    {Text["I", {17.5, 6.5, 28.899169999999998}], 
     Text["I", {17.5, 6.5, -7.99917}]}, {Text["Br", {17.5, 7.5, 22.79917}], 
     Text["Br", {17.5, 7.5, -7.99917}]}, {Text["Cl", {17.5, 8.5, 18.19917}], 
     Text["Cl", {17.5, 8.5, -7.99917}]}, {Text["F", {17.5, 9.5, 11.26917}], 
     Text["F", {17.5, 9.5, -7.99917}]}, {}}, 
   {{}, {}, {}, {RGBColor[1, 0, 0], Text["Uuo", {18.5, 4.5, 7.99917}]}, 
    {Text["Rn", {18.5, 5.5, 24.99917}], Text["Rn", {18.5, 5.5, -7.99917}]}, 
    {Text["Xe", {18.5, 6.5, 20.63917}], Text["Xe", {18.5, 6.5, -7.99917}]}, 
    {Text["Kr", {18.5, 7.5, 17.01917}], Text["Kr", {18.5, 7.5, -7.99917}]}, 
    {Text["Ar", {18.5, 8.5, 14.49917}], Text["Ar", {18.5, 8.5, -7.99917}]}, 
    {Text["Ne", {18.5, 9.5, 9.74917}], Text["Ne", {18.5, 9.5, -7.99917}]}, 
    {Text["He", {18.5, 10.5, 8.08217}], Text["He", 
      {18.5, 10.5, -7.99917}]}}}}, 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]]
