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 A165299 #7 Feb 24 2019 20:39:31 %S A165299 1,1,1,1,1,2,2,3,3,2,2,2,2,60,60,1,3,10,10,42,42,20,12,30,30,252,36,4, %T A165299 4,8,8,231,231,70,210,2,2,5460,5460,14,42,660,132,1260,1260,56,840, %U A165299 210,210,7956,7956,44,396,440,440,228,228,40,120,24,24,720720,144144,715,2145,102,510 %N A165299 a(n) = A002790(n) / A164020(n). %p A165299 A002790 := proc(n) add((-1)^k*stirling1(n, k)/(k+1), k=0..n) ; denom(%) ; end proc: %p A165299 A002445 := proc(n) bernoulli(2*n) ; denom(%) ; end proc: %p A165299 A164020 := proc(n) if type(n,'even') then A002445(n/2) ; else n+1 ; end if; end proc: %p A165299 A165299 := proc(n) A002790(n)/A164020(n) ; end proc: %p A165299 seq(A165299(n),n=0..80) ; # _R. J. Mathar_, Jul 04 2011 %K A165299 nonn %O A165299 0,6 %A A165299 _Paul Curtz_, Sep 14 2009