Graphics3D[{{{{}, {}, {}, {}, Cuboid[{1, 5, 1}, {2, 6, 5.709068479085438}], 
    Cuboid[{1, 6, 1}, {2, 7, 5.744476460983757}], 
    Cuboid[{1, 7, 1}, {2, 8, 5.818687298156949}], 
    Cuboid[{1, 8, 1}, {2, 9, 5.915851596888831}], 
    Cuboid[{1, 9, 1}, {2, 10, 6.117414145430759}], 
    Cuboid[{1, 10, 1}, {2, 11, 2.639771360348915}]}, 
   {{}, {}, {}, Cuboid[{2, 4, 1}, {3, 5, 6.880538232688584}], 
    Cuboid[{2, 5, 1}, {3, 6, 6.907905267733262}], 
    Cuboid[{2, 6, 1}, {3, 7, 6.956688290091316}], 
    Cuboid[{2, 7, 1}, {3, 8, 7.016744203993967}], 
    Cuboid[{2, 8, 1}, {3, 9, 6.827791734841752}], 
    Cuboid[{2, 9, 1}, {3, 10, 7.352537249467252}], {}}, 
   {Cuboid[{3, 1, 1}, {4, 2, 7.187770536372886}], 
    Cuboid[{3, 2, 1}, {4, 3, 7.084352147639225}], {}, {}, {}, 
    Cuboid[{3, 6, 1}, {4, 7, 7.495069610130007}], 
    Cuboid[{3, 7, 1}, {4, 8, 7.503372317443868}], {}, {}, {}}, 
   {Cuboid[{4, 1, 1}, {5, 2, 7.612410981724951}], 
    Cuboid[{4, 2, 1}, {5, 3, 6.976488116663229}], {}, {}, 
    Cuboid[{4, 5, 1}, {5, 6, 7.826502990009467}], 
    Cuboid[{4, 6, 1}, {5, 7, 7.663008336699126}], 
    Cuboid[{4, 7, 1}, {5, 8, 7.5710358599357885}], {}, {}, {}}, 
   {Cuboid[{5, 1, 1}, {6, 2, 7.520315853982904}], 
    Cuboid[{5, 2, 1}, {6, 3, 7.093529202826343}], {}, {}, 
    Cuboid[{5, 5, 1}, {6, 6, 8.098688435425268}], 
    Cuboid[{5, 6, 1}, {6, 7, 7.919410734627613}], 
    Cuboid[{5, 7, 1}, {6, 8, 7.688524066969906}], {}, {}, {}}, 
   {Cuboid[{6, 1, 1}, {7, 2, 7.250032065134544}], 
    Cuboid[{6, 2, 1}, {7, 3, 7.165609387971742}], {}, {}, 
    Cuboid[{6, 5, 1}, {7, 6, 8.214776427957519}], 
    Cuboid[{6, 6, 1}, {7, 7, 7.971137547744373}], 
    Cuboid[{6, 7, 1}, {7, 8, 7.687148960755468}], {}, {}, {}}, 
   {Cuboid[{7, 1, 1}, {8, 2, 6.821271035760359}], 
    Cuboid[{7, 2, 1}, {8, 3, 7.2248626496185615}], {}, {}, 
    Cuboid[{7, 5, 1}, {8, 6, 8.14877817313136}], 
    Cuboid[{7, 6, 1}, {8, 7, 7.795708262824537}], 
    Cuboid[{7, 7, 1}, {8, 8, 7.3259062468974845}], {}, {}, {}}, 
   {Cuboid[{8, 1, 1}, {9, 2, 6.816900160638051}], 
    Cuboid[{8, 2, 1}, {9, 3, 7.204260809981151}], {}, {}, 
    Cuboid[{8, 5, 1}, {9, 6, 8.103539649402506}], 
    Cuboid[{8, 6, 1}, {9, 7, 7.866012949677598}], 
    Cuboid[{8, 7, 1}, {9, 8, 7.501717281620744}], {}, {}, {}}, 
   {Cuboid[{9, 1, 1}, {10, 2, 7.278732456631628}], 
    Cuboid[{9, 2, 1}, {10, 3, 6.998646619170205}], {}, {}, 
    Cuboid[{9, 5, 1}, {10, 6, 7.9154029322761525}], 
    Cuboid[{9, 6, 1}, {10, 7, 7.712958013332404}], 
    Cuboid[{9, 7, 1}, {10, 8, 7.477689081227701}], {}, {}, {}}, 
   {Cuboid[{10, 1, 1}, {11, 2, 7.38903880036714}], 
    Cuboid[{10, 2, 1}, {11, 3, 7.3690649752762125}], {}, {}, 
    Cuboid[{10, 5, 1}, {11, 6, 7.621415618664453}], 
    Cuboid[{10, 6, 1}, {11, 7, 7.511005103937621}], 
    Cuboid[{10, 7, 1}, {11, 8, 7.454806751152172}], {}, {}, {}}, 
   {Cuboid[{11, 1, 1}, {12, 2, 7.187770536372886}], 
    Cuboid[{11, 2, 1}, {12, 3, 7.395813685394155}], {}, {}, 
    Cuboid[{11, 5, 1}, {12, 6, 7.198430367888178}], 
    Cuboid[{11, 6, 1}, {12, 7, 7.118769567293753}], 
    Cuboid[{11, 7, 1}, {12, 8, 7.2135989270587215}], {}, {}, {}}, 
   {Cuboid[{12, 1, 1}, {13, 2, 7.06744771771573}], 
    Cuboid[{12, 2, 1}, {13, 3, 7.429609859595862}], {}, {}, 
    Cuboid[{12, 5, 1}, {13, 6, 5.456687702519478}], 
    Cuboid[{12, 6, 1}, {13, 7, 6.38724962116284}], 
    Cuboid[{12, 7, 1}, {13, 8, 6.54056813208395}], {}, {}, {}}, 
   {Cuboid[{13, 1, 1}, {14, 2, 7.032756644144939}], 
    Cuboid[{13, 2, 1}, {14, 3, 7.465741167924988}], {}, {}, 
    Cuboid[{13, 5, 1}, {14, 6, 6.358102198060921}], 
    Cuboid[{13, 6, 1}, {14, 7, 6.063203644262958}], 
    Cuboid[{13, 7, 1}, {14, 8, 5.713435731684339}], 
    Cuboid[{13, 8, 1}, {14, 9, 6.838908825346997}], 
    Cuboid[{13, 9, 1}, {14, 10, 7.76138306306421}], {}}, 
   {Cuboid[{14, 1, 1}, {15, 2, 7.49562527374556}], 
    Cuboid[{14, 2, 1}, {15, 3, 7.478819567739867}], {}, {}, 
    Cuboid[{14, 5, 1}, {15, 6, 6.39794580542727}], 
    Cuboid[{14, 6, 1}, {15, 7, 6.224716832570479}], 
    Cuboid[{14, 7, 1}, {15, 8, 7.099573268253438}], 
    Cuboid[{14, 8, 1}, {15, 9, 7.430795993827386}], 
    Cuboid[{14, 9, 1}, {15, 10, 8.248829969128629}], {}}, 
   {Cuboid[{15, 1, 1}, {16, 2, 7.00320181312615}], 
    Cuboid[{15, 2, 1}, {16, 3, 7.505574779584631}], {}, {}, 
    Cuboid[{15, 5, 1}, {16, 6, 6.29977611079207}], 
    Cuboid[{15, 6, 1}, {16, 7, 6.8065859679427785}], 
    Cuboid[{15, 7, 1}, {16, 8, 6.994070580434057}], 
    Cuboid[{15, 8, 1}, {16, 9, 5.760005265752479}], 
    Cuboid[{15, 9, 1}, {16, 10, 4.143928062410929}], {}}, 
   {Cuboid[{16, 1, 1}, {17, 2, 7.00320181312615}], 
    Cuboid[{16, 2, 1}, {17, 3, 6.99590350950883}], {}, {}, 
    Cuboid[{16, 5, 1}, {17, 6, 6.267485138022959}], 
    Cuboid[{16, 6, 1}, {17, 7, 6.5829388487566245}], 
    Cuboid[{16, 7, 1}, {17, 8, 6.202839114822193}], 
    Cuboid[{16, 8, 1}, {17, 9, 5.961932744501944}], 
    Cuboid[{16, 9, 1}, {17, 10, 4.004602186721239}], {}}, 
   {Cuboid[{17, 1, 1}, {18, 2, 7.549688109406773}], 
    Cuboid[{17, 2, 1}, {18, 3, 7.5684567441739965}], {}, {}, 
    Cuboid[{17, 5, 1}, {18, 6, 6.35463087634202}], 
    Cuboid[{17, 6, 1}, {18, 7, 5.958037020995463}], 
    Cuboid[{17, 7, 1}, {18, 8, 5.582932239950347}], 
    Cuboid[{17, 8, 1}, {18, 9, 5.145457519903701}], 
    Cuboid[{17, 9, 1}, {18, 10, 3.9806157968937574}], {}}, 
   {{}, {}, {}, {}, Cuboid[{18, 5, 1}, {19, 6, 5.30900999608678}], 
    Cuboid[{18, 6, 1}, {19, 7, 5.083575918497971}], 
    Cuboid[{18, 7, 1}, {19, 8, 4.7517782056241815}], 
    Cuboid[{18, 8, 1}, {19, 9, 4.429029488269218}], 
    Cuboid[{18, 9, 1}, {19, 10, 3.201119103278941}], {}}}, GrayLevel[0], 
  {{{}, {}, {}, {RGBColor[1, 0, 0], Text["Fr", 
      {1.5, 4.5, 1.0560905860877972}]}, 
    {Text["Cs", {1.5, 5.5, 5.765159065173235}], 
     Text["Cs", {1.5, 5.5, 0.9439094139122028}]}, 
    {Text["Rb", {1.5, 6.5, 5.800567047071554}], 
     Text["Rb", {1.5, 6.5, 0.9439094139122028}]}, 
    {Text["K", {1.5, 7.5, 5.874777884244746}], 
     Text["K", {1.5, 7.5, 0.9439094139122028}]}, 
    {Text["Na", {1.5, 8.5, 5.971942182976628}], 
     Text["Na", {1.5, 8.5, 0.9439094139122028}]}, 
    {Text["Li", {1.5, 9.5, 6.173504731518556}], 
     Text["Li", {1.5, 9.5, 0.9439094139122028}]}, 
    {Text["H", {1.5, 10.5, 2.695861946436712}], 
     Text["H", {1.5, 10.5, 0.9439094139122028}]}}, 
   {{}, {}, {}, {Text["Ra", {2.5, 4.5, 6.936628818776382}], 
     Text["Ra", {2.5, 4.5, 0.9439094139122028}]}, 
    {Text["Ba", {2.5, 5.5, 6.963995853821059}], 
     Text["Ba", {2.5, 5.5, 0.9439094139122028}]}, 
    {Text["Sr", {2.5, 6.5, 7.012778876179113}], 
     Text["Sr", {2.5, 6.5, 0.9439094139122028}]}, 
    {Text["Ca", {2.5, 7.5, 7.072834790081764}], 
     Text["Ca", {2.5, 7.5, 0.9439094139122028}]}, 
    {Text["Mg", {2.5, 8.5, 6.883882320929549}], 
     Text["Mg", {2.5, 8.5, 0.9439094139122028}]}, 
    {Text["Be", {2.5, 9.5, 7.408627835555049}], 
     Text["Be", {2.5, 9.5, 0.9439094139122028}]}, {}}, 
   {{Text["Ac", {3.5, 1.5, 7.243861122460683}], 
     Text["Ac", {3.5, 1.5, 0.9439094139122028}]}, 
    {Text["La", {3.5, 2.5, 7.140442733727022}], 
     Text["La", {3.5, 2.5, 0.9439094139122028}]}, {}, {}, {}, 
    {Text["Y", {3.5, 6.5, 7.551160196217804}], 
     Text["Y", {3.5, 6.5, 0.9439094139122028}]}, 
    {Text["Sc", {3.5, 7.5, 7.559462903531665}], 
     Text["Sc", {3.5, 7.5, 0.9439094139122028}]}, {}, {}, {}}, 
   {{Text["Th", {4.5, 1.5, 7.668501567812748}], 
     Text["Th", {4.5, 1.5, 0.9439094139122028}]}, 
    {Text["Ce", {4.5, 2.5, 7.032578702751026}], 
     Text["Ce", {4.5, 2.5, 0.9439094139122028}]}, {}, 
    {RGBColor[1, 0, 0], Text["Rf", {4.5, 4.5, 1.0560905860877972}]}, 
    {Text["Hf", {4.5, 5.5, 7.882593576097264}], 
     Text["Hf", {4.5, 5.5, 0.9439094139122028}]}, 
    {Text["Zr", {4.5, 6.5, 7.719098922786923}], 
     Text["Zr", {4.5, 6.5, 0.9439094139122028}]}, 
    {Text["Ti", {4.5, 7.5, 7.627126446023586}], 
     Text["Ti", {4.5, 7.5, 0.9439094139122028}]}, {}, {}, {}}, 
   {{Text["Pa", {5.5, 1.5, 7.576406440070701}], 
     Text["Pa", {5.5, 1.5, 0.9439094139122028}]}, 
    {Text["Pr", {5.5, 2.5, 7.14961978891414}], 
     Text["Pr", {5.5, 2.5, 0.9439094139122028}]}, {}, 
    {RGBColor[1, 0, 0], Text["Db", {5.5, 4.5, 1.0560905860877972}]}, 
    {Text["Ta", {5.5, 5.5, 8.154779021513065}], 
     Text["Ta", {5.5, 5.5, 0.9439094139122028}]}, 
    {Text["Nb", {5.5, 6.5, 7.97550132071541}], 
     Text["Nb", {5.5, 6.5, 0.9439094139122028}]}, 
    {Text["V", {5.5, 7.5, 7.744614653057703}], 
     Text["V", {5.5, 7.5, 0.9439094139122028}]}, {}, {}, {}}, 
   {{Text["U", {6.5, 1.5, 7.306122651222341}], 
     Text["U", {6.5, 1.5, 0.9439094139122028}]}, 
    {Text["Nd", {6.5, 2.5, 7.221699974059539}], 
     Text["Nd", {6.5, 2.5, 0.9439094139122028}]}, {}, 
    {RGBColor[1, 0, 0], Text["Sg", {6.5, 4.5, 1.0560905860877972}]}, 
    {Text["W", {6.5, 5.5, 8.270867014045315}], 
     Text["W", {6.5, 5.5, 0.9439094139122028}]}, 
    {Text["Mo", {6.5, 6.5, 8.02722813383217}], 
     Text["Mo", {6.5, 6.5, 0.9439094139122028}]}, 
    {Text["Cr", {6.5, 7.5, 7.743239546843265}], 
     Text["Cr", {6.5, 7.5, 0.9439094139122028}]}, {}, {}, {}}, 
   {{Text["Np", {7.5, 1.5, 6.877361621848157}], 
     Text["Np", {7.5, 1.5, 0.9439094139122028}]}, 
    {Text["Pm", {7.5, 2.5, 7.280953235706359}], 
     Text["Pm", {7.5, 2.5, 0.9439094139122028}]}, {}, 
    {RGBColor[1, 0, 0], Text["Bh", {7.5, 4.5, 1.0560905860877972}]}, 
    {Text["Re", {7.5, 5.5, 8.204868759219156}], 
     Text["Re", {7.5, 5.5, 0.9439094139122028}]}, 
    {Text["Tc", {7.5, 6.5, 7.851798848912334}], 
     Text["Tc", {7.5, 6.5, 0.9439094139122028}]}, 
    {Text["Mn", {7.5, 7.5, 7.381996832985282}], 
     Text["Mn", {7.5, 7.5, 0.9439094139122028}]}, {}, {}, {}}, 
   {{Text["Pu", {8.5, 1.5, 6.872990746725848}], 
     Text["Pu", {8.5, 1.5, 0.9439094139122028}]}, 
    {Text["Sm", {8.5, 2.5, 7.260351396068948}], 
     Text["Sm", {8.5, 2.5, 0.9439094139122028}]}, {}, 
    {RGBColor[1, 0, 0], Text["Hs", {8.5, 4.5, 1.0560905860877972}]}, 
    {Text["Os", {8.5, 5.5, 8.159630235490303}], 
     Text["Os", {8.5, 5.5, 0.9439094139122028}]}, 
    {Text["Ru", {8.5, 6.5, 7.9221035357653955}], 
     Text["Ru", {8.5, 6.5, 0.9439094139122028}]}, 
    {Text["Fe", {8.5, 7.5, 7.557807867708541}], 
     Text["Fe", {8.5, 7.5, 0.9439094139122028}]}, {}, {}, {}}, 
   {{Text["Am", {9.5, 1.5, 7.334823042719425}], 
     Text["Am", {9.5, 1.5, 0.9439094139122028}]}, 
    {Text["Eu", {9.5, 2.5, 7.054737205258002}], 
     Text["Eu", {9.5, 2.5, 0.9439094139122028}]}, {}, 
    {RGBColor[1, 0, 0], Text["Mt", {9.5, 4.5, 1.0560905860877972}]}, 
    {Text["Ir", {9.5, 5.5, 7.97149351836395}], 
     Text["Ir", {9.5, 5.5, 0.9439094139122028}]}, 
    {Text["Rh", {9.5, 6.5, 7.769048599420201}], 
     Text["Rh", {9.5, 6.5, 0.9439094139122028}]}, 
    {Text["Co", {9.5, 7.5, 7.533779667315498}], 
     Text["Co", {9.5, 7.5, 0.9439094139122028}]}, {}, {}, {}}, 
   {{Text["Cm", {10.5, 1.5, 7.445129386454937}], 
     Text["Cm", {10.5, 1.5, 0.9439094139122028}]}, 
    {Text["Gd", {10.5, 2.5, 7.42515556136401}], 
     Text["Gd", {10.5, 2.5, 0.9439094139122028}]}, {}, 
    {RGBColor[1, 0, 0], Text["Ds", {10.5, 4.5, 1.0560905860877972}]}, 
    {Text["Pt", {10.5, 5.5, 7.67750620475225}], 
     Text["Pt", {10.5, 5.5, 0.9439094139122028}]}, 
    {Text["Pd", {10.5, 6.5, 7.567095690025418}], 
     Text["Pd", {10.5, 6.5, 0.9439094139122028}]}, 
    {Text["Ni", {10.5, 7.5, 7.510897337239969}], 
     Text["Ni", {10.5, 7.5, 0.9439094139122028}]}, {}, {}, {}}, 
   {{Text["Bk", {11.5, 1.5, 7.243861122460683}], 
     Text["Bk", {11.5, 1.5, 0.9439094139122028}]}, 
    {Text["Tb", {11.5, 2.5, 7.451904271481952}], 
     Text["Tb", {11.5, 2.5, 0.9439094139122028}]}, {}, 
    {RGBColor[1, 0, 0], Text["Rg", {11.5, 4.5, 1.0560905860877972}]}, 
    {Text["Au", {11.5, 5.5, 7.254520953975975}], 
     Text["Au", {11.5, 5.5, 0.9439094139122028}]}, 
    {Text["Ag", {11.5, 6.5, 7.17486015338155}], 
     Text["Ag", {11.5, 6.5, 0.9439094139122028}]}, 
    {Text["Cu", {11.5, 7.5, 7.269689513146519}], 
     Text["Cu", {11.5, 7.5, 0.9439094139122028}]}, {}, {}, {}}, 
   {{Text["Cf", {12.5, 1.5, 7.123538303803527}], 
     Text["Cf", {12.5, 1.5, 0.9439094139122028}]}, 
    {Text["Dy", {12.5, 2.5, 7.485700445683659}], 
     Text["Dy", {12.5, 2.5, 0.9439094139122028}]}, {}, 
    {RGBColor[1, 0, 0], Text["Uub", {12.5, 4.5, 1.0560905860877972}]}, 
    {Text["Hg", {12.5, 5.5, 5.512778288607275}], 
     Text["Hg", {12.5, 5.5, 0.9439094139122028}]}, 
    {Text["Cd", {12.5, 6.5, 6.443340207250637}], 
     Text["Cd", {12.5, 6.5, 0.9439094139122028}]}, 
    {Text["Zn", {12.5, 7.5, 6.5966587181717475}], 
     Text["Zn", {12.5, 7.5, 0.9439094139122028}]}, {}, {}, {}}, 
   {{Text["Es", {13.5, 1.5, 7.088847230232736}], 
     Text["Es", {13.5, 1.5, 0.9439094139122028}]}, 
    {Text["Ho", {13.5, 2.5, 7.521831754012785}], 
     Text["Ho", {13.5, 2.5, 0.9439094139122028}]}, {}, 
    {RGBColor[1, 0, 0], Text["Uut", {13.5, 4.5, 1.0560905860877972}]}, 
    {Text["Tl", {13.5, 5.5, 6.414192784148718}], 
     Text["Tl", {13.5, 5.5, 0.9439094139122028}]}, 
    {Text["In", {13.5, 6.5, 6.119294230350755}], 
     Text["In", {13.5, 6.5, 0.9439094139122028}]}, 
    {Text["Ga", {13.5, 7.5, 5.7695263177721365}], 
     Text["Ga", {13.5, 7.5, 0.9439094139122028}]}, 
    {Text["Al", {13.5, 8.5, 6.894999411434794}], 
     Text["Al", {13.5, 8.5, 0.9439094139122028}]}, 
    {Text["B", {13.5, 9.5, 7.817473649152007}], 
     Text["B", {13.5, 9.5, 0.9439094139122028}]}, {}}, 
   {{Text["Fm", {14.5, 1.5, 7.551715859833357}], 
     Text["Fm", {14.5, 1.5, 0.9439094139122028}]}, 
    {Text["Er", {14.5, 2.5, 7.534910153827664}], 
     Text["Er", {14.5, 2.5, 0.9439094139122028}]}, {}, 
    {RGBColor[1, 0, 0], Text["Uuq", {14.5, 4.5, 1.0560905860877972}]}, 
    {Text["Pb", {14.5, 5.5, 6.454036391515067}], 
     Text["Pb", {14.5, 5.5, 0.9439094139122028}]}, 
    {Text["Sn", {14.5, 6.5, 6.280807418658276}], 
     Text["Sn", {14.5, 6.5, 0.9439094139122028}]}, 
    {Text["Ge", {14.5, 7.5, 7.155663854341235}], 
     Text["Ge", {14.5, 7.5, 0.9439094139122028}]}, 
    {Text["Si", {14.5, 8.5, 7.486886579915184}], 
     Text["Si", {14.5, 8.5, 0.9439094139122028}]}, 
    {Text["C", {14.5, 9.5, 8.304920555216425}], 
     Text["C", {14.5, 9.5, 0.9439094139122028}]}, {}}, 
   {{Text["Md", {15.5, 1.5, 7.059292399213947}], 
     Text["Md", {15.5, 1.5, 0.9439094139122028}]}, 
    {Text["Tm", {15.5, 2.5, 7.561665365672428}], 
     Text["Tm", {15.5, 2.5, 0.9439094139122028}]}, {}, 
    {RGBColor[1, 0, 0], Text["Uup", {15.5, 4.5, 1.0560905860877972}]}, 
    {Text["Bi", {15.5, 5.5, 6.355866696879867}], 
     Text["Bi", {15.5, 5.5, 0.9439094139122028}]}, 
    {Text["Sb", {15.5, 6.5, 6.862676554030576}], 
     Text["Sb", {15.5, 6.5, 0.9439094139122028}]}, 
    {Text["As", {15.5, 7.5, 7.050161166521854}], 
     Text["As", {15.5, 7.5, 0.9439094139122028}]}, 
    {Text["P", {15.5, 8.5, 5.816095851840276}], 
     Text["P", {15.5, 8.5, 0.9439094139122028}]}, 
    {Text["N", {15.5, 9.5, 4.200018648498726}], 
     Text["N", {15.5, 9.5, 0.9439094139122028}]}, {}}, 
   {{Text["No", {16.5, 1.5, 7.059292399213947}], 
     Text["No", {16.5, 1.5, 0.9439094139122028}]}, 
    {Text["Yb", {16.5, 2.5, 7.051994095596627}], 
     Text["Yb", {16.5, 2.5, 0.9439094139122028}]}, {}, 
    {RGBColor[1, 0, 0], Text["Uuh", {16.5, 4.5, 1.0560905860877972}]}, 
    {Text["Po", {16.5, 5.5, 6.323575724110756}], 
     Text["Po", {16.5, 5.5, 0.9439094139122028}]}, 
    {Text["Te", {16.5, 6.5, 6.639029434844422}], 
     Text["Te", {16.5, 6.5, 0.9439094139122028}]}, 
    {Text["Se", {16.5, 7.5, 6.25892970090999}], 
     Text["Se", {16.5, 7.5, 0.9439094139122028}]}, 
    {Text["S", {16.5, 8.5, 6.018023330589741}], 
     Text["S", {16.5, 8.5, 0.9439094139122028}]}, 
    {Text["O", {16.5, 9.5, 4.060692772809036}], 
     Text["O", {16.5, 9.5, 0.9439094139122028}]}, {}}, 
   {{Text["Lr", {17.5, 1.5, 7.60577869549457}], 
     Text["Lr", {17.5, 1.5, 0.9439094139122028}]}, 
    {Text["Lu", {17.5, 2.5, 7.624547330261794}], 
     Text["Lu", {17.5, 2.5, 0.9439094139122028}]}, {}, 
    {RGBColor[1, 0, 0], Text["Uus", {17.5, 4.5, 1.0560905860877972}]}, 
    {Text["At", {17.5, 5.5, 6.410721462429817}], 
     Text["At", {17.5, 5.5, 0.9439094139122028}]}, 
    {Text["I", {17.5, 6.5, 6.01412760708326}], 
     Text["I", {17.5, 6.5, 0.9439094139122028}]}, 
    {Text["Br", {17.5, 7.5, 5.639022826038144}], 
     Text["Br", {17.5, 7.5, 0.9439094139122028}]}, 
    {Text["Cl", {17.5, 8.5, 5.201548105991498}], 
     Text["Cl", {17.5, 8.5, 0.9439094139122028}]}, 
    {Text["F", {17.5, 9.5, 4.036706382981555}], 
     Text["F", {17.5, 9.5, 0.9439094139122028}]}, {}}, 
   {{}, {}, {}, {RGBColor[1, 0, 0], Text["Uuo", 
      {18.5, 4.5, 1.0560905860877972}]}, 
    {Text["Rn", {18.5, 5.5, 5.365100582174577}], 
     Text["Rn", {18.5, 5.5, 0.9439094139122028}]}, 
    {Text["Xe", {18.5, 6.5, 5.139666504585768}], 
     Text["Xe", {18.5, 6.5, 0.9439094139122028}]}, 
    {Text["Kr", {18.5, 7.5, 4.807868791711979}], 
     Text["Kr", {18.5, 7.5, 0.9439094139122028}]}, 
    {Text["Ar", {18.5, 8.5, 4.485120074357015}], 
     Text["Ar", {18.5, 8.5, 0.9439094139122028}]}, 
    {Text["Ne", {18.5, 9.5, 3.257209689366738}], 
     Text["Ne", {18.5, 9.5, 0.9439094139122028}]}, 
    {RGBColor[1, 0, 0], Text["He", {18.5, 10.5, 1.0560905860877972}]}}}}, 
 ViewPoint -> {3, -4, 15}, BoxRatios -> {2, 1, 1}, ImageSize -> 500, 
 SphericalRegion -> True, Boxed -> False, Axes -> {False, False, True}, 
 Ticks -> {None, None, {{2.302585092994046, "10"}, {3.912023005428146, "50"}, 
    {4.605170185988092, "100"}, {6.214608098422191, "500"}, 
    {6.907755278982137, "1000"}, {8.517193191416238, "5000"}, 
    {9.210340371976184, "1*10^4"}, {10.819778284410283, "5*10^4"}, 
    {2.995732273553991, ""}, {3.4011973816621555, ""}, 
    {3.6888794541139363, ""}, {4.0943445622221, ""}, {4.248495242049359, ""}, 
    {4.382026634673881, ""}, {4.499809670330265, ""}, 
    {5.298317366548036, ""}, {5.703782474656201, ""}, 
    {5.991464547107982, ""}, {6.396929655216146, ""}, 
    {6.551080335043404, ""}, {6.684611727667927, ""}, 
    {6.802394763324311, ""}, {7.600902459542082, ""}, 
    {8.006367567650246, ""}, {8.294049640102028, ""}, 
    {8.699514748210191, ""}, {8.85366542803745, ""}, {8.987196820661973, ""}, 
    {9.104979856318357, ""}, {9.903487552536127, ""}, 
    {10.308952660644293, ""}, {10.596634733096073, ""}}}, 
 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]]
