Graphics3D[{{{{}, {}, {}, {}, Cuboid[{1, 5, 1}, {2, 6, 9.}], 
    Cuboid[{1, 6, 1}, {2, 7, 11.}], Cuboid[{1, 7, 1}, {2, 8, 27.}], 
    Cuboid[{1, 8, 1}, {2, 9, 12.}], Cuboid[{1, 9, 1}, {2, 10, 10.}], 
    Cuboid[{1, 10, 1}, {2, 11, 23.}]}, {{}, {}, {}, {}, 
    Cuboid[{2, 5, 1}, {3, 6, 8.}], Cuboid[{2, 6, 1}, {3, 7, 6.}], 
    Cuboid[{2, 7, 1}, {3, 8, 19.}], Cuboid[{2, 8, 1}, {3, 9, 38.}], 
    Cuboid[{2, 9, 1}, {3, 10, 15.}], {}}, {{}, {}, {}, {}, {}, 
    Cuboid[{3, 6, 1}, {4, 7, 43.}], Cuboid[{3, 7, 1}, {4, 8, 43.}], {}, {}, 
    {}}, {Cuboid[{4, 1, 1}, {5, 2, 39.}], Cuboid[{4, 2, 1}, {5, 3, 3.}], {}, 
    {}, Cuboid[{4, 5, 1}, {5, 6, 29.}], Cuboid[{4, 6, 1}, {5, 7, 26.}], 
    Cuboid[{4, 7, 1}, {5, 8, 30.}], {}, {}, {}}, 
   {{}, {}, {}, {}, Cuboid[{5, 5, 1}, {6, 6, 43.}], {}, 
    Cuboid[{5, 7, 1}, {6, 8, 43.}], {}, {}, {}}, 
   {Cuboid[{6, 1, 1}, {7, 2, 40.}], {}, {}, {}, Cuboid[{6, 5, 1}, 
     {7, 6, 43.}], Cuboid[{6, 6, 1}, {7, 7, 43.}], 
    Cuboid[{6, 7, 1}, {7, 8, 43.}], {}, {}, {}}, 
   {{}, {}, {}, {}, {}, {}, Cuboid[{7, 7, 1}, {8, 8, 43.}], {}, {}, {}}, 
   {{}, Cuboid[{8, 2, 1}, {9, 3, 2.}], {}, {}, Cuboid[{8, 5, 1}, 
     {9, 6, 43.}], Cuboid[{8, 6, 1}, {9, 7, 43.}], 
    Cuboid[{8, 7, 1}, {9, 8, 43.}], {}, {}, {}}, 
   {{}, {}, {}, {}, Cuboid[{9, 5, 1}, {10, 6, 43.}], 
    Cuboid[{9, 6, 1}, {10, 7, 43.}], Cuboid[{9, 7, 1}, {10, 8, 43.}], {}, {}, 
    {}}, {{}, {}, {}, {}, Cuboid[{10, 5, 1}, {11, 6, 43.}], 
    Cuboid[{10, 6, 1}, {11, 7, 44.}], Cuboid[{10, 7, 1}, {11, 8, 43.}], {}, 
    {}, {}}, {{}, {}, {}, {}, {}, {}, Cuboid[{11, 7, 1}, {12, 8, 43.}], {}, 
    {}, {}}, {{}, {}, {}, {}, Cuboid[{12, 5, 1}, {13, 6, 35.}], 
    Cuboid[{12, 6, 1}, {13, 7, 31.}], Cuboid[{12, 7, 1}, {13, 8, 13.}], {}, 
    {}, {}}, {{}, Cuboid[{13, 2, 1}, {14, 3, 43.}], {}, {}, 
    Cuboid[{13, 5, 1}, {14, 6, 16.}], Cuboid[{13, 6, 1}, {14, 7, 43.}], 
    Cuboid[{13, 7, 1}, {14, 8, 34.}], Cuboid[{13, 8, 1}, {14, 9, 7.}], {}, 
    {}}, {{}, {}, {}, {}, Cuboid[{14, 5, 1}, {15, 6, 41.}], {}, 
    Cuboid[{14, 7, 1}, {15, 8, 43.}], Cuboid[{14, 8, 1}, {15, 9, 4.}], 
    Cuboid[{14, 9, 1}, {15, 10, 5.}], {}}, 
   {{}, Cuboid[{15, 2, 1}, {16, 3, 43.}], {}, {}, 
    Cuboid[{15, 5, 1}, {16, 6, 42.}], {}, Cuboid[{15, 7, 1}, {16, 8, 14.}], 
    Cuboid[{15, 8, 1}, {16, 9, 28.}], Cuboid[{15, 9, 1}, {16, 10, 25.}], {}}, 
   {{}, {}, {}, {}, {}, Cuboid[{16, 6, 1}, {17, 7, 36.}], 
    Cuboid[{16, 7, 1}, {17, 8, 33.}], {}, Cuboid[{16, 9, 1}, {17, 10, 1.}], 
    {}}, {{}, Cuboid[{17, 2, 1}, {18, 3, 43.}], {}, {}, {}, 
    Cuboid[{17, 6, 1}, {18, 7, 18.}], Cuboid[{17, 7, 1}, {18, 8, 17.}], {}, 
    Cuboid[{17, 9, 1}, {18, 10, 45.}], {}}, {{}, {}, {}, {}, 
    Cuboid[{18, 5, 1}, {19, 6, 37.}], Cuboid[{18, 6, 1}, {19, 7, 32.}], 
    Cuboid[{18, 7, 1}, {19, 8, 24.}], Cuboid[{18, 8, 1}, {19, 9, 21.}], 
    Cuboid[{18, 9, 1}, {19, 10, 20.}], Cuboid[{18, 10, 1}, {19, 11, 22.}]}}, 
  GrayLevel[0], {{{}, {}, {}, {RGBColor[1, 0, 0], 
     Text["Fr", {1.5, 4.5, 1.44}]}, {Text["Cs", {1.5, 5.5, 9.44}], 
     Text["Cs", {1.5, 5.5, 0.56}]}, {Text["Rb", {1.5, 6.5, 11.44}], 
     Text["Rb", {1.5, 6.5, 0.56}]}, {Text["K", {1.5, 7.5, 27.44}], 
     Text["K", {1.5, 7.5, 0.56}]}, {Text["Na", {1.5, 8.5, 12.44}], 
     Text["Na", {1.5, 8.5, 0.56}]}, {Text["Li", {1.5, 9.5, 10.44}], 
     Text["Li", {1.5, 9.5, 0.56}]}, {Text["H", {1.5, 10.5, 23.44}], 
     Text["H", {1.5, 10.5, 0.56}]}}, {{}, {}, {}, 
    {RGBColor[1, 0, 0], Text["Ra", {2.5, 4.5, 1.44}]}, 
    {Text["Ba", {2.5, 5.5, 8.44}], Text["Ba", {2.5, 5.5, 0.56}]}, 
    {Text["Sr", {2.5, 6.5, 6.44}], Text["Sr", {2.5, 6.5, 0.56}]}, 
    {Text["Ca", {2.5, 7.5, 19.44}], Text["Ca", {2.5, 7.5, 0.56}]}, 
    {Text["Mg", {2.5, 8.5, 38.44}], Text["Mg", {2.5, 8.5, 0.56}]}, 
    {Text["Be", {2.5, 9.5, 15.44}], Text["Be", {2.5, 9.5, 0.56}]}, {}}, 
   {{RGBColor[1, 0, 0], Text["Ac", {3.5, 1.5, 1.44}]}, 
    {RGBColor[1, 0, 0], Text["La", {3.5, 2.5, 1.44}]}, {}, {}, {}, 
    {Text["Y", {3.5, 6.5, 43.44}], Text["Y", {3.5, 6.5, 0.56}]}, 
    {Text["Sc", {3.5, 7.5, 43.44}], Text["Sc", {3.5, 7.5, 0.56}]}, {}, {}, 
    {}}, {{Text["Th", {4.5, 1.5, 39.44}], Text["Th", {4.5, 1.5, 0.56}]}, 
    {Text["Ce", {4.5, 2.5, 3.44}], Text["Ce", {4.5, 2.5, 0.56}]}, {}, 
    {RGBColor[1, 0, 0], Text["Rf", {4.5, 4.5, 1.44}]}, 
    {Text["Hf", {4.5, 5.5, 29.44}], Text["Hf", {4.5, 5.5, 0.56}]}, 
    {Text["Zr", {4.5, 6.5, 26.44}], Text["Zr", {4.5, 6.5, 0.56}]}, 
    {Text["Ti", {4.5, 7.5, 30.44}], Text["Ti", {4.5, 7.5, 0.56}]}, {}, {}, 
    {}}, {{RGBColor[1, 0, 0], Text["Pa", {5.5, 1.5, 1.44}]}, 
    {RGBColor[1, 0, 0], Text["Pr", {5.5, 2.5, 1.44}]}, {}, 
    {RGBColor[1, 0, 0], Text["Db", {5.5, 4.5, 1.44}]}, 
    {Text["Ta", {5.5, 5.5, 43.44}], Text["Ta", {5.5, 5.5, 0.56}]}, 
    {RGBColor[1, 0, 0], Text["Nb", {5.5, 6.5, 1.44}]}, 
    {Text["V", {5.5, 7.5, 43.44}], Text["V", {5.5, 7.5, 0.56}]}, {}, {}, {}}, 
   {{Text["U", {6.5, 1.5, 40.44}], Text["U", {6.5, 1.5, 0.56}]}, 
    {RGBColor[1, 0, 0], Text["Nd", {6.5, 2.5, 1.44}]}, {}, 
    {RGBColor[1, 0, 0], Text["Sg", {6.5, 4.5, 1.44}]}, 
    {Text["W", {6.5, 5.5, 43.44}], Text["W", {6.5, 5.5, 0.56}]}, 
    {Text["Mo", {6.5, 6.5, 43.44}], Text["Mo", {6.5, 6.5, 0.56}]}, 
    {Text["Cr", {6.5, 7.5, 43.44}], Text["Cr", {6.5, 7.5, 0.56}]}, {}, {}, 
    {}}, {{RGBColor[1, 0, 0], Text["Np", {7.5, 1.5, 1.44}]}, 
    {RGBColor[1, 0, 0], Text["Pm", {7.5, 2.5, 1.44}]}, {}, 
    {RGBColor[1, 0, 0], Text["Bh", {7.5, 4.5, 1.44}]}, 
    {RGBColor[1, 0, 0], Text["Re", {7.5, 5.5, 1.44}]}, 
    {RGBColor[1, 0, 0], Text["Tc", {7.5, 6.5, 1.44}]}, 
    {Text["Mn", {7.5, 7.5, 43.44}], Text["Mn", {7.5, 7.5, 0.56}]}, {}, {}, 
    {}}, {{RGBColor[1, 0, 0], Text["Pu", {8.5, 1.5, 1.44}]}, 
    {Text["Sm", {8.5, 2.5, 2.44}], Text["Sm", {8.5, 2.5, 0.56}]}, {}, 
    {RGBColor[1, 0, 0], Text["Hs", {8.5, 4.5, 1.44}]}, 
    {Text["Os", {8.5, 5.5, 43.44}], Text["Os", {8.5, 5.5, 0.56}]}, 
    {Text["Ru", {8.5, 6.5, 43.44}], Text["Ru", {8.5, 6.5, 0.56}]}, 
    {Text["Fe", {8.5, 7.5, 43.44}], Text["Fe", {8.5, 7.5, 0.56}]}, {}, {}, 
    {}}, {{RGBColor[1, 0, 0], Text["Am", {9.5, 1.5, 1.44}]}, 
    {RGBColor[1, 0, 0], Text["Eu", {9.5, 2.5, 1.44}]}, {}, 
    {RGBColor[1, 0, 0], Text["Mt", {9.5, 4.5, 1.44}]}, 
    {Text["Ir", {9.5, 5.5, 43.44}], Text["Ir", {9.5, 5.5, 0.56}]}, 
    {Text["Rh", {9.5, 6.5, 43.44}], Text["Rh", {9.5, 6.5, 0.56}]}, 
    {Text["Co", {9.5, 7.5, 43.44}], Text["Co", {9.5, 7.5, 0.56}]}, {}, {}, 
    {}}, {{RGBColor[1, 0, 0], Text["Cm", {10.5, 1.5, 1.44}]}, 
    {RGBColor[1, 0, 0], Text["Gd", {10.5, 2.5, 1.44}]}, {}, 
    {RGBColor[1, 0, 0], Text["Ds", {10.5, 4.5, 1.44}]}, 
    {Text["Pt", {10.5, 5.5, 43.44}], Text["Pt", {10.5, 5.5, 0.56}]}, 
    {Text["Pd", {10.5, 6.5, 44.44}], Text["Pd", {10.5, 6.5, 0.56}]}, 
    {Text["Ni", {10.5, 7.5, 43.44}], Text["Ni", {10.5, 7.5, 0.56}]}, {}, {}, 
    {}}, {{RGBColor[1, 0, 0], Text["Bk", {11.5, 1.5, 1.44}]}, 
    {RGBColor[1, 0, 0], Text["Tb", {11.5, 2.5, 1.44}]}, {}, 
    {RGBColor[1, 0, 0], Text["Rg", {11.5, 4.5, 1.44}]}, 
    {RGBColor[1, 0, 0], Text["Au", {11.5, 5.5, 1.44}]}, 
    {RGBColor[1, 0, 0], Text["Ag", {11.5, 6.5, 1.44}]}, 
    {Text["Cu", {11.5, 7.5, 43.44}], Text["Cu", {11.5, 7.5, 0.56}]}, {}, {}, 
    {}}, {{RGBColor[1, 0, 0], Text["Cf", {12.5, 1.5, 1.44}]}, 
    {RGBColor[1, 0, 0], Text["Dy", {12.5, 2.5, 1.44}]}, {}, 
    {RGBColor[1, 0, 0], Text["Uub", {12.5, 4.5, 1.44}]}, 
    {Text["Hg", {12.5, 5.5, 35.44}], Text["Hg", {12.5, 5.5, 0.56}]}, 
    {Text["Cd", {12.5, 6.5, 31.44}], Text["Cd", {12.5, 6.5, 0.56}]}, 
    {Text["Zn", {12.5, 7.5, 13.44}], Text["Zn", {12.5, 7.5, 0.56}]}, {}, {}, 
    {}}, {{RGBColor[1, 0, 0], Text["Es", {13.5, 1.5, 1.44}]}, 
    {Text["Ho", {13.5, 2.5, 43.44}], Text["Ho", {13.5, 2.5, 0.56}]}, {}, 
    {RGBColor[1, 0, 0], Text["Uut", {13.5, 4.5, 1.44}]}, 
    {Text["Tl", {13.5, 5.5, 16.44}], Text["Tl", {13.5, 5.5, 0.56}]}, 
    {Text["In", {13.5, 6.5, 43.44}], Text["In", {13.5, 6.5, 0.56}]}, 
    {Text["Ga", {13.5, 7.5, 34.44}], Text["Ga", {13.5, 7.5, 0.56}]}, 
    {Text["Al", {13.5, 8.5, 7.44}], Text["Al", {13.5, 8.5, 0.56}]}, 
    {RGBColor[1, 0, 0], Text["B", {13.5, 9.5, 1.44}]}, {}}, 
   {{RGBColor[1, 0, 0], Text["Fm", {14.5, 1.5, 1.44}]}, 
    {RGBColor[1, 0, 0], Text["Er", {14.5, 2.5, 1.44}]}, {}, 
    {RGBColor[1, 0, 0], Text["Uuq", {14.5, 4.5, 1.44}]}, 
    {Text["Pb", {14.5, 5.5, 41.44}], Text["Pb", {14.5, 5.5, 0.56}]}, 
    {RGBColor[1, 0, 0], Text["Sn", {14.5, 6.5, 1.44}]}, 
    {Text["Ge", {14.5, 7.5, 43.44}], Text["Ge", {14.5, 7.5, 0.56}]}, 
    {Text["Si", {14.5, 8.5, 4.44}], Text["Si", {14.5, 8.5, 0.56}]}, 
    {Text["C", {14.5, 9.5, 5.44}], Text["C", {14.5, 9.5, 0.56}]}, {}}, 
   {{RGBColor[1, 0, 0], Text["Md", {15.5, 1.5, 1.44}]}, 
    {Text["Tm", {15.5, 2.5, 43.44}], Text["Tm", {15.5, 2.5, 0.56}]}, {}, 
    {RGBColor[1, 0, 0], Text["Uup", {15.5, 4.5, 1.44}]}, 
    {Text["Bi", {15.5, 5.5, 42.44}], Text["Bi", {15.5, 5.5, 0.56}]}, 
    {RGBColor[1, 0, 0], Text["Sb", {15.5, 6.5, 1.44}]}, 
    {Text["As", {15.5, 7.5, 14.44}], Text["As", {15.5, 7.5, 0.56}]}, 
    {Text["P", {15.5, 8.5, 28.44}], Text["P", {15.5, 8.5, 0.56}]}, 
    {Text["N", {15.5, 9.5, 25.44}], Text["N", {15.5, 9.5, 0.56}]}, {}}, 
   {{RGBColor[1, 0, 0], Text["No", {16.5, 1.5, 1.44}]}, 
    {RGBColor[1, 0, 0], Text["Yb", {16.5, 2.5, 1.44}]}, {}, 
    {RGBColor[1, 0, 0], Text["Uuh", {16.5, 4.5, 1.44}]}, 
    {RGBColor[1, 0, 0], Text["Po", {16.5, 5.5, 1.44}]}, 
    {Text["Te", {16.5, 6.5, 36.44}], Text["Te", {16.5, 6.5, 0.56}]}, 
    {Text["Se", {16.5, 7.5, 33.44}], Text["Se", {16.5, 7.5, 0.56}]}, 
    {RGBColor[1, 0, 0], Text["S", {16.5, 8.5, 1.44}]}, 
    {Text["O", {16.5, 9.5, 1.44}], Text["O", {16.5, 9.5, 1}]}, {}}, 
   {{RGBColor[1, 0, 0], Text["Lr", {17.5, 1.5, 1.44}]}, 
    {Text["Lu", {17.5, 2.5, 43.44}], Text["Lu", {17.5, 2.5, 0.56}]}, {}, 
    {RGBColor[1, 0, 0], Text["Uus", {17.5, 4.5, 1.44}]}, 
    {RGBColor[1, 0, 0], Text["At", {17.5, 5.5, 1.44}]}, 
    {Text["I", {17.5, 6.5, 18.44}], Text["I", {17.5, 6.5, 0.56}]}, 
    {Text["Br", {17.5, 7.5, 17.44}], Text["Br", {17.5, 7.5, 0.56}]}, 
    {RGBColor[1, 0, 0], Text["Cl", {17.5, 8.5, 1.44}]}, 
    {Text["F", {17.5, 9.5, 45.44}], Text["F", {17.5, 9.5, 0.56}]}, {}}, 
   {{}, {}, {}, {RGBColor[1, 0, 0], Text["Uuo", {18.5, 4.5, 1.44}]}, 
    {Text["Rn", {18.5, 5.5, 37.44}], Text["Rn", {18.5, 5.5, 0.56}]}, 
    {Text["Xe", {18.5, 6.5, 32.44}], Text["Xe", {18.5, 6.5, 0.56}]}, 
    {Text["Kr", {18.5, 7.5, 24.44}], Text["Kr", {18.5, 7.5, 0.56}]}, 
    {Text["Ar", {18.5, 8.5, 21.44}], Text["Ar", {18.5, 8.5, 0.56}]}, 
    {Text["Ne", {18.5, 9.5, 20.44}], Text["Ne", {18.5, 9.5, 0.56}]}, 
    {Text["He", {18.5, 10.5, 22.44}], Text["He", {18.5, 10.5, 0.56}]}}}}, 
 ViewPoint -> {3, -4, 15}, BoxRatios -> {2, 1, 1}, ImageSize -> 500, 
 SphericalRegion -> True, Boxed -> False, Axes -> {False, False, True}, 
 Ticks -> {None, None, {{1, "1073"}, {2, "1325"}, {3, "1333"}, {4, "1346"}, 
    {5, "1361"}, {6, "1383"}, {7, "1396"}, {8, "1400"}, {9, "1407"}, 
    {10, "1415"}, {11, "1423"}, {12, "1428"}, {13, "1436"}, {14, "1558"}, 
    {15, "1567"}, {16, "1707"}, {17, "1744"}, {18, "1759"}, {19, "1855"}, 
    {20, "1913"}, {21, "1951"}, {22, "1963"}, {23, "1966"}, {24, "1970"}, 
    {25, "1977"}, {26, "2008"}, {27, "2257"}, {28, "2447"}, {29, "2545"}, 
    {30, "2546"}, {31, "2570"}, {32, "2591"}, {33, "2658"}, {34, "2803"}, 
    {35, "2809"}, {36, "2811"}, {37, "2912"}, {38, "2950"}, {39, "2975"}, 
    {40, "2979"}, {41, "3077"}, {42, "3080"}, {43, "3089"}, {44, "3200"}, 
    {45, "9192"}}}, 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]]
