Graphics3D[{{{{}, {}, {}, {}, Cuboid[{1, 5, 0}, {2, 6, 5.*^-8}], 
    Cuboid[{1, 6, 0}, {2, 7, 0.000012}], Cuboid[{1, 7, 0}, {2, 8, 0.042}], 
    Cuboid[{1, 8, 0}, {2, 9, 1.1}], Cuboid[{1, 9, 0}, {2, 10, 0.000018}], 
    Cuboid[{1, 10, 0}, {2, 11, 11.}]}, {{}, {}, {}, 
    Cuboid[{2, 4, 0}, {3, 5, 1.*^-15}], Cuboid[{2, 5, 0}, {3, 6, 3.*^-6}], 
    Cuboid[{2, 6, 0}, {3, 7, 0.00081}], Cuboid[{2, 7, 0}, {3, 8, 0.00042}], 
    Cuboid[{2, 8, 0}, {3, 9, 0.13}], Cuboid[{2, 9, 0}, {3, 10, 6.*^-11}], 
    {}}, {{}, Cuboid[{3, 2, 0}, {4, 3, 3.4*^-10}], {}, {}, {}, 
    Cuboid[{3, 6, 0}, {4, 7, 1.3*^-9}], Cuboid[{3, 7, 0}, {4, 8, 1.5*^-10}], 
    {}, {}, {}}, {Cuboid[{4, 1, 0}, {5, 2, 4.*^-12}], 
    Cuboid[{4, 2, 0}, {5, 3, 1.2*^-10}], {}, {}, 
    Cuboid[{4, 5, 0}, {5, 6, 8.*^-10}], Cuboid[{4, 6, 0}, {5, 7, 2.6*^-9}], 
    Cuboid[{4, 7, 0}, {5, 8, 1.*^-7}], {}, {}, {}}, 
   {Cuboid[{5, 1, 0}, {6, 2, 2.*^-23}], Cuboid[{5, 2, 0}, {6, 3, 6.*^-11}], 
    {}, {}, Cuboid[{5, 5, 0}, {6, 6, 2.*^-10}], Cuboid[{5, 6, 0}, 
     {6, 7, 1.*^-10}], Cuboid[{5, 7, 0}, {6, 8, 1.5*^-7}], {}, {}, {}}, 
   {Cuboid[{6, 1, 0}, {7, 2, 3.3*^-7}], Cuboid[{6, 2, 0}, {7, 3, 2.8*^-10}], 
    {}, {}, Cuboid[{6, 5, 0}, {7, 6, 1.2*^-8}], Cuboid[{6, 6, 0}, 
     {7, 7, 1.*^-6}], Cuboid[{6, 7, 0}, {7, 8, 6.*^-8}], {}, {}, {}}, 
   {{}, {}, {}, {}, Cuboid[{7, 5, 0}, {8, 6, 1.*^-10}], {}, 
    Cuboid[{7, 7, 0}, {8, 8, 2.*^-7}], {}, {}, {}}, 
   {{}, Cuboid[{8, 2, 0}, {9, 3, 4.5*^-11}], {}, {}, {}, 
    Cuboid[{8, 6, 0}, {9, 7, 7.*^-11}], Cuboid[{8, 7, 0}, {9, 8, 3.*^-7}], 
    {}, {}, {}}, {{}, Cuboid[{9, 2, 0}, {10, 3, 1.3*^-11}], {}, {}, {}, {}, 
    Cuboid[{9, 7, 0}, {10, 8, 8.*^-9}], {}, {}, {}}, 
   {{}, Cuboid[{10, 2, 0}, {11, 3, 7.*^-11}], {}, {}, {}, {}, 
    Cuboid[{10, 7, 0}, {11, 8, 2.*^-7}], {}, {}, {}}, 
   {{}, Cuboid[{11, 2, 0}, {12, 3, 1.4*^-11}], {}, {}, 
    Cuboid[{11, 5, 0}, {12, 6, 5.*^-9}], Cuboid[{11, 6, 0}, {12, 7, 1.*^-8}], 
    Cuboid[{11, 7, 0}, {12, 8, 3.*^-7}], {}, {}, {}}, 
   {{}, Cuboid[{12, 2, 0}, {13, 3, 9.1*^-11}], {}, {}, 
    Cuboid[{12, 5, 0}, {13, 6, 5.*^-9}], Cuboid[{12, 6, 0}, {13, 7, 5.*^-9}], 
    Cuboid[{12, 7, 0}, {13, 8, 5.*^-7}], {}, {}, {}}, 
   {{}, Cuboid[{13, 2, 0}, {14, 3, 2.2*^-11}], {}, {}, 
    Cuboid[{13, 5, 0}, {14, 6, 1.*^-10}], Cuboid[{13, 6, 0}, 
     {14, 7, 1.*^-11}], Cuboid[{13, 7, 0}, {14, 8, 3.*^-9}], 
    Cuboid[{13, 8, 0}, {14, 9, 5.*^-7}], Cuboid[{13, 9, 0}, 
     {14, 10, 0.00044}], {}}, {{}, Cuboid[{14, 2, 0}, {15, 3, 9.*^-11}], {}, 
    {}, Cuboid[{14, 5, 0}, {15, 6, 3.*^-9}], Cuboid[{14, 6, 0}, 
     {15, 7, 1.*^-9}], Cuboid[{14, 7, 0}, {15, 8, 6.*^-9}], 
    Cuboid[{14, 8, 0}, {15, 9, 0.0001}], Cuboid[{14, 9, 0}, 
     {15, 10, 0.0028}], {}}, {{}, Cuboid[{15, 2, 0}, {16, 3, 2.*^-11}], {}, 
    {}, Cuboid[{15, 5, 0}, {16, 6, 2.*^-9}], Cuboid[{15, 6, 0}, 
     {16, 7, 2.*^-8}], Cuboid[{15, 7, 0}, {16, 8, 2.3*^-7}], 
    Cuboid[{15, 8, 0}, {16, 9, 7.*^-6}], Cuboid[{15, 9, 0}, 
     {16, 10, 0.00005}], {}}, {{}, Cuboid[{16, 2, 0}, {17, 3, 8.*^-11}], {}, 
    {}, Cuboid[{16, 5, 0}, {17, 6, 2.*^-18}], {}, 
    Cuboid[{16, 7, 0}, {17, 8, 4.5*^-8}], Cuboid[{16, 8, 0}, {17, 9, 0.093}], 
    Cuboid[{16, 9, 0}, {17, 10, 86.}], {}}, 
   {{}, Cuboid[{17, 2, 0}, {18, 3, 1.5*^-11}], {}, {}, {}, 
    Cuboid[{17, 6, 0}, {18, 7, 6.*^-6}], Cuboid[{17, 7, 0}, {18, 8, 0.0067}], 
    Cuboid[{17, 8, 0}, {18, 9, 2.}], Cuboid[{17, 9, 0}, {18, 10, 0.00013}], 
    {}}, {{}, {}, {}, {}, Cuboid[{18, 5, 0}, {19, 6, 6.*^-20}], 
    Cuboid[{18, 6, 0}, {19, 7, 5.*^-10}], Cuboid[{18, 7, 0}, 
     {19, 8, 2.1*^-8}], Cuboid[{18, 8, 0}, {19, 9, 0.000045}], 
    Cuboid[{18, 9, 0}, {19, 10, 1.2*^-8}], Cuboid[{18, 10, 0}, 
     {19, 11, 7.2*^-10}]}}, GrayLevel[0], 
  {{{}, {}, {}, {RGBColor[1, 0, 0], Text["Fr", {1.5, 4.5, 0.86}]}, 
    {Text["Cs", {1.5, 5.5, 0.86000005}], Text["Cs", {1.5, 5.5, -0.86}]}, 
    {Text["Rb", {1.5, 6.5, 0.860012}], Text["Rb", {1.5, 6.5, -0.86}]}, 
    {Text["K", {1.5, 7.5, 0.902}], Text["K", {1.5, 7.5, -0.86}]}, 
    {Text["Na", {1.5, 8.5, 1.96}], Text["Na", {1.5, 8.5, -0.86}]}, 
    {Text["Li", {1.5, 9.5, 0.860018}], Text["Li", {1.5, 9.5, -0.86}]}, 
    {Text["H", {1.5, 10.5, 11.86}], Text["H", {1.5, 10.5, -0.86}]}}, 
   {{}, {}, {}, {Text["Ra", {2.5, 4.5, 0.860000000000001}], 
     Text["Ra", {2.5, 4.5, -0.86}]}, {Text["Ba", {2.5, 5.5, 0.860003}], 
     Text["Ba", {2.5, 5.5, -0.86}]}, {Text["Sr", {2.5, 6.5, 0.86081}], 
     Text["Sr", {2.5, 6.5, -0.86}]}, {Text["Ca", {2.5, 7.5, 0.86042}], 
     Text["Ca", {2.5, 7.5, -0.86}]}, {Text["Mg", {2.5, 8.5, 0.99}], 
     Text["Mg", {2.5, 8.5, -0.86}]}, {Text["Be", {2.5, 9.5, 0.86000000006}], 
     Text["Be", {2.5, 9.5, -0.86}]}, {}}, 
   {{RGBColor[1, 0, 0], Text["Ac", {3.5, 1.5, 0.86}]}, 
    {Text["La", {3.5, 2.5, 0.86000000034}], Text["La", {3.5, 2.5, -0.86}]}, 
    {}, {}, {}, {Text["Y", {3.5, 6.5, 0.8600000013}], 
     Text["Y", {3.5, 6.5, -0.86}]}, {Text["Sc", {3.5, 7.5, 0.86000000015}], 
     Text["Sc", {3.5, 7.5, -0.86}]}, {}, {}, {}}, 
   {{Text["Th", {4.5, 1.5, 0.860000000004}], Text["Th", {4.5, 1.5, -0.86}]}, 
    {Text["Ce", {4.5, 2.5, 0.86000000012}], Text["Ce", {4.5, 2.5, -0.86}]}, 
    {}, {RGBColor[1, 0, 0], Text["Rf", {4.5, 4.5, 0.86}]}, 
    {Text["Hf", {4.5, 5.5, 0.8600000007999999}], 
     Text["Hf", {4.5, 5.5, -0.86}]}, {Text["Zr", {4.5, 6.5, 0.8600000026}], 
     Text["Zr", {4.5, 6.5, -0.86}]}, 
    {Text["Ti", {4.5, 7.5, 0.8600000999999999}], 
     Text["Ti", {4.5, 7.5, -0.86}]}, {}, {}, {}}, 
   {{Text["Pa", {5.5, 1.5, 0.86}], Text["Pa", {5.5, 1.5, -0.86}]}, 
    {Text["Pr", {5.5, 2.5, 0.86000000006}], Text["Pr", {5.5, 2.5, -0.86}]}, 
    {}, {RGBColor[1, 0, 0], Text["Db", {5.5, 4.5, 0.86}]}, 
    {Text["Ta", {5.5, 5.5, 0.8600000002}], Text["Ta", {5.5, 5.5, -0.86}]}, 
    {Text["Nb", {5.5, 6.5, 0.8600000001}], Text["Nb", {5.5, 6.5, -0.86}]}, 
    {Text["V", {5.5, 7.5, 0.86000015}], Text["V", {5.5, 7.5, -0.86}]}, {}, 
    {}, {}}, {{Text["U", {6.5, 1.5, 0.86000033}], 
     Text["U", {6.5, 1.5, -0.86}]}, {Text["Nd", {6.5, 2.5, 0.86000000028}], 
     Text["Nd", {6.5, 2.5, -0.86}]}, {}, {RGBColor[1, 0, 0], 
     Text["Sg", {6.5, 4.5, 0.86}]}, {Text["W", {6.5, 5.5, 0.860000012}], 
     Text["W", {6.5, 5.5, -0.86}]}, {Text["Mo", {6.5, 6.5, 0.860001}], 
     Text["Mo", {6.5, 6.5, -0.86}]}, {Text["Cr", {6.5, 7.5, 0.86000006}], 
     Text["Cr", {6.5, 7.5, -0.86}]}, {}, {}, {}}, 
   {{RGBColor[1, 0, 0], Text["Np", {7.5, 1.5, 0.86}]}, 
    {RGBColor[1, 0, 0], Text["Pm", {7.5, 2.5, 0.86}]}, {}, 
    {RGBColor[1, 0, 0], Text["Bh", {7.5, 4.5, 0.86}]}, 
    {Text["Re", {7.5, 5.5, 0.8600000001}], Text["Re", {7.5, 5.5, -0.86}]}, 
    {RGBColor[1, 0, 0], Text["Tc", {7.5, 6.5, 0.86}]}, 
    {Text["Mn", {7.5, 7.5, 0.8600002}], Text["Mn", {7.5, 7.5, -0.86}]}, {}, 
    {}, {}}, {{RGBColor[1, 0, 0], Text["Pu", {8.5, 1.5, 0.86}]}, 
    {Text["Sm", {8.5, 2.5, 0.860000000045}], Text["Sm", {8.5, 2.5, -0.86}]}, 
    {}, {RGBColor[1, 0, 0], Text["Hs", {8.5, 4.5, 0.86}]}, 
    {RGBColor[1, 0, 0], Text["Os", {8.5, 5.5, 0.86}]}, 
    {Text["Ru", {8.5, 6.5, 0.86000000007}], Text["Ru", {8.5, 6.5, -0.86}]}, 
    {Text["Fe", {8.5, 7.5, 0.8600002999999999}], 
     Text["Fe", {8.5, 7.5, -0.86}]}, {}, {}, {}}, 
   {{RGBColor[1, 0, 0], Text["Am", {9.5, 1.5, 0.86}]}, 
    {Text["Eu", {9.5, 2.5, 0.860000000013}], Text["Eu", {9.5, 2.5, -0.86}]}, 
    {}, {RGBColor[1, 0, 0], Text["Mt", {9.5, 4.5, 0.86}]}, 
    {RGBColor[1, 0, 0], Text["Ir", {9.5, 5.5, 0.86}]}, 
    {RGBColor[1, 0, 0], Text["Rh", {9.5, 6.5, 0.86}]}, 
    {Text["Co", {9.5, 7.5, 0.860000008}], Text["Co", {9.5, 7.5, -0.86}]}, {}, 
    {}, {}}, {{RGBColor[1, 0, 0], Text["Cm", {10.5, 1.5, 0.86}]}, 
    {Text["Gd", {10.5, 2.5, 0.86000000007}], Text["Gd", {10.5, 2.5, -0.86}]}, 
    {}, {RGBColor[1, 0, 0], Text["Ds", {10.5, 4.5, 0.86}]}, 
    {RGBColor[1, 0, 0], Text["Pt", {10.5, 5.5, 0.86}]}, 
    {RGBColor[1, 0, 0], Text["Pd", {10.5, 6.5, 0.86}]}, 
    {Text["Ni", {10.5, 7.5, 0.8600002}], Text["Ni", {10.5, 7.5, -0.86}]}, {}, 
    {}, {}}, {{RGBColor[1, 0, 0], Text["Bk", {11.5, 1.5, 0.86}]}, 
    {Text["Tb", {11.5, 2.5, 0.860000000014}], 
     Text["Tb", {11.5, 2.5, -0.86}]}, {}, {RGBColor[1, 0, 0], 
     Text["Rg", {11.5, 4.5, 0.86}]}, {Text["Au", {11.5, 5.5, 0.860000005}], 
     Text["Au", {11.5, 5.5, -0.86}]}, {Text["Ag", {11.5, 6.5, 0.86000001}], 
     Text["Ag", {11.5, 6.5, -0.86}]}, 
    {Text["Cu", {11.5, 7.5, 0.8600002999999999}], 
     Text["Cu", {11.5, 7.5, -0.86}]}, {}, {}, {}}, 
   {{RGBColor[1, 0, 0], Text["Cf", {12.5, 1.5, 0.86}]}, 
    {Text["Dy", {12.5, 2.5, 0.860000000091}], 
     Text["Dy", {12.5, 2.5, -0.86}]}, {}, {RGBColor[1, 0, 0], 
     Text["Uub", {12.5, 4.5, 0.86}]}, {Text["Hg", {12.5, 5.5, 0.860000005}], 
     Text["Hg", {12.5, 5.5, -0.86}]}, {Text["Cd", {12.5, 6.5, 0.860000005}], 
     Text["Cd", {12.5, 6.5, -0.86}]}, {Text["Zn", {12.5, 7.5, 0.8600005}], 
     Text["Zn", {12.5, 7.5, -0.86}]}, {}, {}, {}}, 
   {{RGBColor[1, 0, 0], Text["Es", {13.5, 1.5, 0.86}]}, 
    {Text["Ho", {13.5, 2.5, 0.8600000000219999}], 
     Text["Ho", {13.5, 2.5, -0.86}]}, {}, {RGBColor[1, 0, 0], 
     Text["Uut", {13.5, 4.5, 0.86}]}, {Text["Tl", {13.5, 5.5, 0.8600000001}], 
     Text["Tl", {13.5, 5.5, -0.86}]}, 
    {Text["In", {13.5, 6.5, 0.86000000001}], Text["In", {13.5, 6.5, -0.86}]}, 
    {Text["Ga", {13.5, 7.5, 0.860000003}], Text["Ga", {13.5, 7.5, -0.86}]}, 
    {Text["Al", {13.5, 8.5, 0.8600005}], Text["Al", {13.5, 8.5, -0.86}]}, 
    {Text["B", {13.5, 9.5, 0.86044}], Text["B", {13.5, 9.5, -0.86}]}, {}}, 
   {{RGBColor[1, 0, 0], Text["Fm", {14.5, 1.5, 0.86}]}, 
    {Text["Er", {14.5, 2.5, 0.86000000009}], Text["Er", {14.5, 2.5, -0.86}]}, 
    {}, {RGBColor[1, 0, 0], Text["Uuq", {14.5, 4.5, 0.86}]}, 
    {Text["Pb", {14.5, 5.5, 0.860000003}], Text["Pb", {14.5, 5.5, -0.86}]}, 
    {Text["Sn", {14.5, 6.5, 0.860000001}], Text["Sn", {14.5, 6.5, -0.86}]}, 
    {Text["Ge", {14.5, 7.5, 0.860000006}], Text["Ge", {14.5, 7.5, -0.86}]}, 
    {Text["Si", {14.5, 8.5, 0.8601}], Text["Si", {14.5, 8.5, -0.86}]}, 
    {Text["C", {14.5, 9.5, 0.8628}], Text["C", {14.5, 9.5, -0.86}]}, {}}, 
   {{RGBColor[1, 0, 0], Text["Md", {15.5, 1.5, 0.86}]}, 
    {Text["Tm", {15.5, 2.5, 0.86000000002}], Text["Tm", {15.5, 2.5, -0.86}]}, 
    {}, {RGBColor[1, 0, 0], Text["Uup", {15.5, 4.5, 0.86}]}, 
    {Text["Bi", {15.5, 5.5, 0.860000002}], Text["Bi", {15.5, 5.5, -0.86}]}, 
    {Text["Sb", {15.5, 6.5, 0.86000002}], Text["Sb", {15.5, 6.5, -0.86}]}, 
    {Text["As", {15.5, 7.5, 0.86000023}], Text["As", {15.5, 7.5, -0.86}]}, 
    {Text["P", {15.5, 8.5, 0.860007}], Text["P", {15.5, 8.5, -0.86}]}, 
    {Text["N", {15.5, 9.5, 0.86005}], Text["N", {15.5, 9.5, -0.86}]}, {}}, 
   {{RGBColor[1, 0, 0], Text["No", {16.5, 1.5, 0.86}]}, 
    {Text["Yb", {16.5, 2.5, 0.86000000008}], Text["Yb", {16.5, 2.5, -0.86}]}, 
    {}, {RGBColor[1, 0, 0], Text["Uuh", {16.5, 4.5, 0.86}]}, 
    {Text["Po", {16.5, 5.5, 0.86}], Text["Po", {16.5, 5.5, -0.86}]}, 
    {RGBColor[1, 0, 0], Text["Te", {16.5, 6.5, 0.86}]}, 
    {Text["Se", {16.5, 7.5, 0.8600000449999999}], 
     Text["Se", {16.5, 7.5, -0.86}]}, {Text["S", {16.5, 8.5, 0.953}], 
     Text["S", {16.5, 8.5, -0.86}]}, {Text["O", {16.5, 9.5, 86.86}], 
     Text["O", {16.5, 9.5, -0.86}]}, {}}, 
   {{RGBColor[1, 0, 0], Text["Lr", {17.5, 1.5, 0.86}]}, 
    {Text["Lu", {17.5, 2.5, 0.860000000015}], 
     Text["Lu", {17.5, 2.5, -0.86}]}, {}, {RGBColor[1, 0, 0], 
     Text["Uus", {17.5, 4.5, 0.86}]}, {RGBColor[1, 0, 0], 
     Text["At", {17.5, 5.5, 0.86}]}, 
    {Text["I", {17.5, 6.5, 0.8600059999999999}], 
     Text["I", {17.5, 6.5, -0.86}]}, {Text["Br", {17.5, 7.5, 0.8667}], 
     Text["Br", {17.5, 7.5, -0.86}]}, {Text["Cl", {17.5, 8.5, 2.86}], 
     Text["Cl", {17.5, 8.5, -0.86}]}, {Text["F", {17.5, 9.5, 0.86013}], 
     Text["F", {17.5, 9.5, -0.86}]}, {}}, 
   {{}, {}, {}, {RGBColor[1, 0, 0], Text["Uuo", {18.5, 4.5, 0.86}]}, 
    {Text["Rn", {18.5, 5.5, 0.86}], Text["Rn", {18.5, 5.5, -0.86}]}, 
    {Text["Xe", {18.5, 6.5, 0.8600000005}], Text["Xe", {18.5, 6.5, -0.86}]}, 
    {Text["Kr", {18.5, 7.5, 0.860000021}], Text["Kr", {18.5, 7.5, -0.86}]}, 
    {Text["Ar", {18.5, 8.5, 0.860045}], Text["Ar", {18.5, 8.5, -0.86}]}, 
    {Text["Ne", {18.5, 9.5, 0.860000012}], Text["Ne", {18.5, 9.5, -0.86}]}, 
    {Text["He", {18.5, 10.5, 0.8600000007199999}], 
     Text["He", {18.5, 10.5, -0.86}]}}}}, 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]]
