Graphics3D[{{{{}, {}, {}, {}, {}, {}, Cuboid[{1, 7, 1}, 
     {2, 8, 0.26236426446749106}], Cuboid[{1, 8, 1}, 
     {2, 9, 1.1939224684724346}], Cuboid[{1, 9, 1}, 
     {2, 10, 1.4350845252893227}], {}}, {{}, {}, {}, {}, 
    Cuboid[{2, 5, 1}, {3, 6, 1.589235205116581}], 
    Cuboid[{2, 6, 1}, {3, 7, 1.8082887711792655}], 
    Cuboid[{2, 7, 1}, {3, 8, 2.0014800002101243}], 
    Cuboid[{2, 8, 1}, {3, 9, 2.833213344056216}], 
    Cuboid[{2, 9, 1}, {3, 10, 4.882801922586371}], {}}, 
   {{}, Cuboid[{3, 2, 1}, {4, 3, 2.6390573296152584}], {}, {}, {}, 
    Cuboid[{3, 6, 1}, {4, 7, 3.258096538021482}], 
    Cuboid[{3, 7, 1}, {4, 8, 3.367295829986474}], {}, {}, {}}, 
   {Cuboid[{4, 1, 1}, {5, 2, 3.4339872044851463}], 
    Cuboid[{4, 2, 1}, {5, 3, 2.6390573296152584}], {}, {}, 
    Cuboid[{4, 5, 1}, {5, 6, 3.4011973816621555}], 
    Cuboid[{4, 6, 1}, {5, 7, 3.4965075614664802}], 
    Cuboid[{4, 7, 1}, {5, 8, 3.784189633918261}], {}, {}, {}}, 
   {{}, Cuboid[{5, 2, 1}, {6, 3, 2.70805020110221}], {}, {}, 
    Cuboid[{5, 5, 1}, {6, 6, 4.23410650459726}], 
    Cuboid[{5, 6, 1}, {6, 7, 3.6375861597263857}], 
    Cuboid[{5, 7, 1}, {6, 8, 3.8501476017100584}], {}, {}, {}}, 
   {Cuboid[{6, 1, 1}, {7, 2, 4.709530201312334}], 
    Cuboid[{6, 2, 1}, {7, 3, 2.772588722239781}], {}, {}, 
    Cuboid[{6, 5, 1}, {7, 6, 5.081404364984463}], 
    Cuboid[{6, 6, 1}, {7, 7, 2.995732273553991}], 
    Cuboid[{6, 7, 1}, {7, 8, 4.74493212836325}], {}, {}, {}}, 
   {{}, Cuboid[{7, 2, 1}, {8, 3, 2.8903717578961645}], {}, {}, 
    Cuboid[{7, 5, 1}, {8, 6, 5.181783550292085}], {}, {}, {}, {}, {}}, 
   {Cuboid[{8, 1, 1}, {9, 2, 3.7612001156935624}], 
    Cuboid[{8, 2, 1}, {9, 3, 2.995732273553991}], {}, {}, 
    Cuboid[{8, 5, 1}, {9, 6, 5.402677381872279}], 
    Cuboid[{8, 6, 1}, {9, 7, 5.153291594497779}], 
    Cuboid[{8, 7, 1}, {9, 8, 4.406719247264253}], {}, {}, {}}, 
   {{}, Cuboid[{9, 2, 1}, {10, 3, 2.066862759472976}], {}, {}, 
    Cuboid[{9, 5, 1}, {10, 6, 5.3471075307174685}], 
    Cuboid[{9, 6, 1}, {10, 7, 5.0106352940962555}], 
    Cuboid[{9, 7, 1}, {10, 8, 4.31748811353631}], {}, {}, {}}, 
   {{}, Cuboid[{10, 2, 1}, {11, 3, 3.091042453358316}], {}, {}, 
    Cuboid[{10, 5, 1}, {11, 6, 4.110873864173311}], 
    Cuboid[{10, 6, 1}, {11, 7, 3.784189633918261}], 
    Cuboid[{10, 7, 1}, {11, 8, 4.330733340286331}], {}, {}, {}}, 
   {{}, Cuboid[{11, 2, 1}, {12, 3, 3.091042453358316}], {}, {}, 
    Cuboid[{11, 5, 1}, {12, 6, 3.295836866004329}], 
    Cuboid[{11, 6, 1}, {12, 7, 3.4011973816621555}], 
    Cuboid[{11, 7, 1}, {12, 8, 3.871201010907891}], {}, {}, {}}, 
   {{}, Cuboid[{12, 2, 1}, {13, 3, 3.2188758248682006}], {}, {}, {}, 
    Cuboid[{12, 6, 1}, {13, 7, 2.9444389791664403}], 
    Cuboid[{12, 7, 1}, {13, 8, 3.7612001156935624}], {}, {}, {}}, 
   {{}, Cuboid[{13, 2, 1}, {14, 3, 3.258096538021482}], {}, {}, 
    Cuboid[{13, 5, 1}, {14, 6, 1.0296194171811581}], {}, {}, 
    Cuboid[{13, 8, 1}, {14, 9, 3.258096538021482}], {}, {}}, 
   {{}, Cuboid[{14, 2, 1}, {15, 3, 3.332204510175204}], {}, {}, 
    Cuboid[{14, 5, 1}, {15, 6, 1.7227665977411035}], 
    Cuboid[{14, 6, 1}, {15, 7, 2.8903717578961645}], {}, {}, {}, {}}, 
   {{}, Cuboid[{15, 2, 1}, {16, 3, 3.4339872044851463}], {}, {}, 
    Cuboid[{15, 5, 1}, {16, 6, 2.4849066497880004}], 
    Cuboid[{15, 6, 1}, {16, 7, 2.995732273553991}], {}, {}, {}, {}}, 
   {{}, Cuboid[{16, 2, 1}, {17, 3, 2.2925347571405443}], {}, {}, {}, 
    Cuboid[{16, 6, 1}, {17, 7, 2.772588722239781}], 
    Cuboid[{16, 7, 1}, {17, 8, 1.308332819650179}], {}, {}, {}}, 
   {{}, Cuboid[{17, 2, 1}, {18, 3, 3.295836866004329}], {}, {}, {}, {}, {}, 
    {}, {}, {}}, {{}, {}, {}, {}, {}, {}, {}, {}, {}, {}}}, GrayLevel[0], 
  {{{}, {}, {}, {RGBColor[1, 0, 0], Text["Fr", 
      {1.5, 4.5, 1.051403131174048}]}, {RGBColor[1, 0, 0], 
     Text["Cs", {1.5, 5.5, 1.051403131174048}]}, {RGBColor[1, 0, 0], 
     Text["Rb", {1.5, 6.5, 1.051403131174048}]}, 
    {Text["K", {1.5, 7.5, 0.31376739564153894}], 
     Text["K", {1.5, 7.5, 1.051403131174048}]}, 
    {Text["Na", {1.5, 8.5, 1.2453255996464825}], 
     Text["Na", {1.5, 8.5, 0.9485968688259521}]}, 
    {Text["Li", {1.5, 9.5, 1.4864876564633707}], 
     Text["Li", {1.5, 9.5, 0.9485968688259521}]}, 
    {RGBColor[1, 0, 0], Text["H", {1.5, 10.5, 1.051403131174048}]}}, 
   {{}, {}, {}, {RGBColor[1, 0, 0], Text["Ra", 
      {2.5, 4.5, 1.051403131174048}]}, 
    {Text["Ba", {2.5, 5.5, 1.640638336290629}], 
     Text["Ba", {2.5, 5.5, 0.9485968688259521}]}, 
    {Text["Sr", {2.5, 6.5, 1.8596919023533134}], 
     Text["Sr", {2.5, 6.5, 0.9485968688259521}]}, 
    {Text["Ca", {2.5, 7.5, 2.052883131384172}], 
     Text["Ca", {2.5, 7.5, 0.9485968688259521}]}, 
    {Text["Mg", {2.5, 8.5, 2.884616475230264}], 
     Text["Mg", {2.5, 8.5, 0.9485968688259521}]}, 
    {Text["Be", {2.5, 9.5, 4.934205053760419}], 
     Text["Be", {2.5, 9.5, 0.9485968688259521}]}, {}}, 
   {{RGBColor[1, 0, 0], Text["Ac", {3.5, 1.5, 1.051403131174048}]}, 
    {Text["La", {3.5, 2.5, 2.690460460789306}], 
     Text["La", {3.5, 2.5, 0.9485968688259521}]}, {}, {}, {}, 
    {Text["Y", {3.5, 6.5, 3.30949966919553}], 
     Text["Y", {3.5, 6.5, 0.9485968688259521}]}, 
    {Text["Sc", {3.5, 7.5, 3.418698961160522}], 
     Text["Sc", {3.5, 7.5, 0.9485968688259521}]}, {}, {}, {}}, 
   {{Text["Th", {4.5, 1.5, 3.485390335659194}], 
     Text["Th", {4.5, 1.5, 0.9485968688259521}]}, 
    {Text["Ce", {4.5, 2.5, 2.690460460789306}], 
     Text["Ce", {4.5, 2.5, 0.9485968688259521}]}, {}, 
    {RGBColor[1, 0, 0], Text["Rf", {4.5, 4.5, 1.051403131174048}]}, 
    {Text["Hf", {4.5, 5.5, 3.452600512836203}], 
     Text["Hf", {4.5, 5.5, 0.9485968688259521}]}, 
    {Text["Zr", {4.5, 6.5, 3.547910692640528}], 
     Text["Zr", {4.5, 6.5, 0.9485968688259521}]}, 
    {Text["Ti", {4.5, 7.5, 3.8355927650923087}], 
     Text["Ti", {4.5, 7.5, 0.9485968688259521}]}, {}, {}, {}}, 
   {{RGBColor[1, 0, 0], Text["Pa", {5.5, 1.5, 1.051403131174048}]}, 
    {Text["Pr", {5.5, 2.5, 2.7594533322762578}], 
     Text["Pr", {5.5, 2.5, 0.9485968688259521}]}, {}, 
    {RGBColor[1, 0, 0], Text["Db", {5.5, 4.5, 1.051403131174048}]}, 
    {Text["Ta", {5.5, 5.5, 4.285509635771308}], 
     Text["Ta", {5.5, 5.5, 0.9485968688259521}]}, 
    {Text["Nb", {5.5, 6.5, 3.6889892909004334}], 
     Text["Nb", {5.5, 6.5, 0.9485968688259521}]}, 
    {Text["V", {5.5, 7.5, 3.901550732884106}], 
     Text["V", {5.5, 7.5, 0.9485968688259521}]}, {}, {}, {}}, 
   {{Text["U", {6.5, 1.5, 4.760933332486382}], 
     Text["U", {6.5, 1.5, 0.9485968688259521}]}, 
    {Text["Nd", {6.5, 2.5, 2.823991853413829}], 
     Text["Nd", {6.5, 2.5, 0.9485968688259521}]}, {}, 
    {RGBColor[1, 0, 0], Text["Sg", {6.5, 4.5, 1.051403131174048}]}, 
    {Text["W", {6.5, 5.5, 5.132807496158511}], 
     Text["W", {6.5, 5.5, 0.9485968688259521}]}, 
    {Text["Mo", {6.5, 6.5, 3.0471354047280386}], 
     Text["Mo", {6.5, 6.5, 0.9485968688259521}]}, 
    {Text["Cr", {6.5, 7.5, 4.796335259537298}], 
     Text["Cr", {6.5, 7.5, 0.9485968688259521}]}, {}, {}, {}}, 
   {{RGBColor[1, 0, 0], Text["Np", {7.5, 1.5, 1.051403131174048}]}, 
    {Text["Pm", {7.5, 2.5, 2.9417748890702122}], 
     Text["Pm", {7.5, 2.5, 0.9485968688259521}]}, {}, 
    {RGBColor[1, 0, 0], Text["Bh", {7.5, 4.5, 1.051403131174048}]}, 
    {Text["Re", {7.5, 5.5, 5.233186681466133}], 
     Text["Re", {7.5, 5.5, 0.9485968688259521}]}, 
    {RGBColor[1, 0, 0], Text["Tc", {7.5, 6.5, 1.051403131174048}]}, 
    {RGBColor[1, 0, 0], Text["Mn", {7.5, 7.5, 1.051403131174048}]}, {}, {}, 
    {}}, {{Text["Pu", {8.5, 1.5, 3.81260324686761}], 
     Text["Pu", {8.5, 1.5, 0.9485968688259521}]}, 
    {Text["Sm", {8.5, 2.5, 3.0471354047280386}], 
     Text["Sm", {8.5, 2.5, 0.9485968688259521}]}, {}, 
    {RGBColor[1, 0, 0], Text["Hs", {8.5, 4.5, 1.051403131174048}]}, 
    {Text["Os", {8.5, 5.5, 5.4540805130463275}], 
     Text["Os", {8.5, 5.5, 0.9485968688259521}]}, 
    {Text["Ru", {8.5, 6.5, 5.2046947256718274}], 
     Text["Ru", {8.5, 6.5, 0.9485968688259521}]}, 
    {Text["Fe", {8.5, 7.5, 4.4581223784383015}], 
     Text["Fe", {8.5, 7.5, 0.9485968688259521}]}, {}, {}, {}}, 
   {{RGBColor[1, 0, 0], Text["Am", {9.5, 1.5, 1.051403131174048}]}, 
    {Text["Eu", {9.5, 2.5, 2.1182658906470238}], 
     Text["Eu", {9.5, 2.5, 0.9485968688259521}]}, {}, 
    {RGBColor[1, 0, 0], Text["Mt", {9.5, 4.5, 1.051403131174048}]}, 
    {Text["Ir", {9.5, 5.5, 5.398510661891517}], 
     Text["Ir", {9.5, 5.5, 0.9485968688259521}]}, 
    {Text["Rh", {9.5, 6.5, 5.062038425270304}], 
     Text["Rh", {9.5, 6.5, 0.9485968688259521}]}, 
    {Text["Co", {9.5, 7.5, 4.368891244710358}], 
     Text["Co", {9.5, 7.5, 0.9485968688259521}]}, {}, {}, {}}, 
   {{RGBColor[1, 0, 0], Text["Cm", {10.5, 1.5, 1.051403131174048}]}, 
    {Text["Gd", {10.5, 2.5, 3.142445584532364}], 
     Text["Gd", {10.5, 2.5, 0.9485968688259521}]}, {}, 
    {RGBColor[1, 0, 0], Text["Ds", {10.5, 4.5, 1.051403131174048}]}, 
    {Text["Pt", {10.5, 5.5, 4.1622769953473595}], 
     Text["Pt", {10.5, 5.5, 0.9485968688259521}]}, 
    {Text["Pd", {10.5, 6.5, 3.8355927650923087}], 
     Text["Pd", {10.5, 6.5, 0.9485968688259521}]}, 
    {Text["Ni", {10.5, 7.5, 4.382136471460379}], 
     Text["Ni", {10.5, 7.5, 0.9485968688259521}]}, {}, {}, {}}, 
   {{RGBColor[1, 0, 0], Text["Bk", {11.5, 1.5, 1.051403131174048}]}, 
    {Text["Tb", {11.5, 2.5, 3.142445584532364}], 
     Text["Tb", {11.5, 2.5, 0.9485968688259521}]}, {}, 
    {RGBColor[1, 0, 0], Text["Rg", {11.5, 4.5, 1.051403131174048}]}, 
    {Text["Au", {11.5, 5.5, 3.347239997178377}], 
     Text["Au", {11.5, 5.5, 0.9485968688259521}]}, 
    {Text["Ag", {11.5, 6.5, 3.452600512836203}], 
     Text["Ag", {11.5, 6.5, 0.9485968688259521}]}, 
    {Text["Cu", {11.5, 7.5, 3.922604142081939}], 
     Text["Cu", {11.5, 7.5, 0.9485968688259521}]}, {}, {}, {}}, 
   {{RGBColor[1, 0, 0], Text["Cf", {12.5, 1.5, 1.051403131174048}]}, 
    {Text["Dy", {12.5, 2.5, 3.2702789560422483}], 
     Text["Dy", {12.5, 2.5, 0.9485968688259521}]}, {}, 
    {RGBColor[1, 0, 0], Text["Uub", {12.5, 4.5, 1.051403131174048}]}, 
    {RGBColor[1, 0, 0], Text["Hg", {12.5, 5.5, 1.051403131174048}]}, 
    {Text["Cd", {12.5, 6.5, 2.995842110340488}], 
     Text["Cd", {12.5, 6.5, 0.9485968688259521}]}, 
    {Text["Zn", {12.5, 7.5, 3.81260324686761}], 
     Text["Zn", {12.5, 7.5, 0.9485968688259521}]}, {}, {}, {}}, 
   {{RGBColor[1, 0, 0], Text["Es", {13.5, 1.5, 1.051403131174048}]}, 
    {Text["Ho", {13.5, 2.5, 3.30949966919553}], 
     Text["Ho", {13.5, 2.5, 0.9485968688259521}]}, {}, 
    {RGBColor[1, 0, 0], Text["Uut", {13.5, 4.5, 1.051403131174048}]}, 
    {Text["Tl", {13.5, 5.5, 1.081022548355206}], 
     Text["Tl", {13.5, 5.5, 0.9485968688259521}]}, 
    {RGBColor[1, 0, 0], Text["In", {13.5, 6.5, 1.051403131174048}]}, 
    {RGBColor[1, 0, 0], Text["Ga", {13.5, 7.5, 1.051403131174048}]}, 
    {Text["Al", {13.5, 8.5, 3.30949966919553}], 
     Text["Al", {13.5, 8.5, 0.9485968688259521}]}, 
    {RGBColor[1, 0, 0], Text["B", {13.5, 9.5, 1.051403131174048}]}, {}}, 
   {{RGBColor[1, 0, 0], Text["Fm", {14.5, 1.5, 1.051403131174048}]}, 
    {Text["Er", {14.5, 2.5, 3.3836076413492515}], 
     Text["Er", {14.5, 2.5, 0.9485968688259521}]}, {}, 
    {RGBColor[1, 0, 0], Text["Uuq", {14.5, 4.5, 1.051403131174048}]}, 
    {Text["Pb", {14.5, 5.5, 1.7741697289151515}], 
     Text["Pb", {14.5, 5.5, 0.9485968688259521}]}, 
    {Text["Sn", {14.5, 6.5, 2.9417748890702122}], 
     Text["Sn", {14.5, 6.5, 0.9485968688259521}]}, 
    {RGBColor[1, 0, 0], Text["Ge", {14.5, 7.5, 1.051403131174048}]}, 
    {RGBColor[1, 0, 0], Text["Si", {14.5, 8.5, 1.051403131174048}]}, 
    {RGBColor[1, 0, 0], Text["C", {14.5, 9.5, 1.051403131174048}]}, {}}, 
   {{RGBColor[1, 0, 0], Text["Md", {15.5, 1.5, 1.051403131174048}]}, 
    {Text["Tm", {15.5, 2.5, 3.485390335659194}], 
     Text["Tm", {15.5, 2.5, 0.9485968688259521}]}, {}, 
    {RGBColor[1, 0, 0], Text["Uup", {15.5, 4.5, 1.051403131174048}]}, 
    {Text["Bi", {15.5, 5.5, 2.536309780962048}], 
     Text["Bi", {15.5, 5.5, 0.9485968688259521}]}, 
    {Text["Sb", {15.5, 6.5, 3.0471354047280386}], 
     Text["Sb", {15.5, 6.5, 0.9485968688259521}]}, 
    {RGBColor[1, 0, 0], Text["As", {15.5, 7.5, 1.051403131174048}]}, 
    {RGBColor[1, 0, 0], Text["P", {15.5, 8.5, 1.051403131174048}]}, 
    {RGBColor[1, 0, 0], Text["N", {15.5, 9.5, 1.051403131174048}]}, {}}, 
   {{RGBColor[1, 0, 0], Text["No", {16.5, 1.5, 1.051403131174048}]}, 
    {Text["Yb", {16.5, 2.5, 2.343937888314592}], 
     Text["Yb", {16.5, 2.5, 0.9485968688259521}]}, {}, 
    {RGBColor[1, 0, 0], Text["Uuh", {16.5, 4.5, 1.051403131174048}]}, 
    {RGBColor[1, 0, 0], Text["Po", {16.5, 5.5, 1.051403131174048}]}, 
    {Text["Te", {16.5, 6.5, 2.823991853413829}], 
     Text["Te", {16.5, 6.5, 0.9485968688259521}]}, 
    {Text["Se", {16.5, 7.5, 1.3597359508242268}], 
     Text["Se", {16.5, 7.5, 0.9485968688259521}]}, 
    {RGBColor[1, 0, 0], Text["S", {16.5, 8.5, 1.051403131174048}]}, 
    {RGBColor[1, 0, 0], Text["O", {16.5, 9.5, 1.051403131174048}]}, {}}, 
   {{RGBColor[1, 0, 0], Text["Lr", {17.5, 1.5, 1.051403131174048}]}, 
    {Text["Lu", {17.5, 2.5, 3.347239997178377}], 
     Text["Lu", {17.5, 2.5, 0.9485968688259521}]}, {}, 
    {RGBColor[1, 0, 0], Text["Uus", {17.5, 4.5, 1.051403131174048}]}, 
    {RGBColor[1, 0, 0], Text["At", {17.5, 5.5, 1.051403131174048}]}, 
    {RGBColor[1, 0, 0], Text["I", {17.5, 6.5, 1.051403131174048}]}, 
    {RGBColor[1, 0, 0], Text["Br", {17.5, 7.5, 1.051403131174048}]}, 
    {RGBColor[1, 0, 0], Text["Cl", {17.5, 8.5, 1.051403131174048}]}, 
    {RGBColor[1, 0, 0], Text["F", {17.5, 9.5, 1.051403131174048}]}, {}}, 
   {{}, {}, {}, {RGBColor[1, 0, 0], Text["Uuo", 
      {18.5, 4.5, 1.051403131174048}]}, {RGBColor[1, 0, 0], 
     Text["Rn", {18.5, 5.5, 1.051403131174048}]}, 
    {RGBColor[1, 0, 0], Text["Xe", {18.5, 6.5, 1.051403131174048}]}, 
    {RGBColor[1, 0, 0], Text["Kr", {18.5, 7.5, 1.051403131174048}]}, 
    {RGBColor[1, 0, 0], Text["Ar", {18.5, 8.5, 1.051403131174048}]}, 
    {RGBColor[1, 0, 0], Text["Ne", {18.5, 9.5, 1.051403131174048}]}, 
    {RGBColor[1, 0, 0], Text["He", {18.5, 10.5, 1.051403131174048}]}}}}, 
 ViewPoint -> {3, -4, 15}, BoxRatios -> {2, 1, 1}, ImageSize -> 500, 
 SphericalRegion -> True, Boxed -> False, Axes -> {False, False, True}, 
 Ticks -> {None, None, {{0., "1"}, {0.6931471805599453, "2"}, 
    {1.6094379124341003, "5"}, {2.302585092994046, "10"}, 
    {2.995732273553991, "20"}, {3.912023005428146, "50"}, 
    {4.605170185988092, "100"}, {5.298317366548036, "200"}, 
    {6.214608098422191, "500"}, {1.0986122886681098, ""}, 
    {1.3862943611198906, ""}, {1.791759469228055, ""}, 
    {1.9459101490553132, ""}, {2.0794415416798357, ""}, 
    {2.1972245773362196, ""}, {3.4011973816621555, ""}, 
    {3.6888794541139363, ""}, {4.0943445622221, ""}, {4.248495242049359, ""}, 
    {4.382026634673881, ""}, {4.499809670330265, ""}, 
    {5.703782474656201, ""}, {5.991464547107982, ""}}}, 
 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]]
