This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A085800 #13 Mar 26 2025 13:26:53
%S A085800 0,0,1,2,4,7,9,16,19,34,39,55,75,113,153,199,245,318,426,499,733,866,
%T A085800 1110,1347,1794,2099,2667,3559,4087,5219
%N A085800 Maximal number of zeros in a row of the character table of the symmetric group S_n.
%o A085800 (GAP)
%o A085800 max:=25;
%o A085800 for n in [1..max] do
%o A085800 ir:=Irr(CharacterTable(SymmetricGroup(n)));
%o A085800 Print(Maximum(List(ir,m->Length(Filtered(List(m,IsZero),k->k=true)))));
%o A085800 if n<max then Print(", ");else Print("\n");fi;
%o A085800 od; # Chris Cummins (cummins(AT)mathstat.concordia.ca), Apr 16 2010
%K A085800 nonn,more
%O A085800 1,4
%A A085800 Yuval Dekel (dekelyuval(AT)hotmail.com), Jul 24 2003
%E A085800 a(9)-a(25) from Chris Cummins (cummins(AT)mathstat.concordia.ca), Apr 16 2010
%E A085800 a(26)-a(30) from _Alexander R. Miller_, Jul 16 2020