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 A089172 #3 Mar 30 2012 18:37:43
%S A089172 11,19,24,27,29,33,34,35,39,43,44,48,49,50,51,53,54,55,59,61,62,64,65,
%T A089172 67,69,71,75,76,79,80,83,84,87,89,90,91,94,97,98,99,101,103,104,105,
%U A089172 107,108,109,111,113,114,115,116,118,119,120,123,124,125,127
%N A089172 Values of n where numerators of series coefficients of 1/(1 + Cosh[Sqrt[x]]) differ from A002425.
%t A089172 it=Table[Numerator[2*BernoulliB[2*n]*(4^n-1)/(2*n)]/ Numerator[SeriesCoefficient[Series[1/(1+Cosh[x]), {x, 0, 2n}], 2n-2]], {n, 1, 96}];Flatten[Position[it, q_Integer/;q>1]]-1
%Y A089172 Cf. A002425.
%K A089172 nonn
%O A089172 1,1
%A A089172 _Wouter Meeussen_, Dec 07 2003