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 A366426 #12 Oct 14 2023 13:12:26 %S A366426 1,1,1,1,1,1,1,1,1,1,1,1,1,1,5,1,1,3,5,5,7,1,5,15,1,1,7,7,1,1,1,1,77, %T A366426 7,35,3,1,1,455,35,7,21,55,55,7,7,7,105,1,5,221,13,11,33,55,1,19,1,5, %U A366426 15,1,1,5005,715,143,33,17,85,161,35,1,3,11,55,95095 %N A366426 a(n) = numerator(denominator(Bernoulli''(n, x)) / denominator(Bernoulli(n, 1))). %F A366426 a(n) = numerator(A366168(n) / A027642(n)). %p A366426 seq(numer(denom(diff(diff(bernoulli(n, x), x),x))/denom(bernoulli(n, 1))), n = 0..75); %o A366426 (PARI) a(n) = numerator(lcm(apply(denominator, Vec(deriv(deriv(bernpol(n))))))/denominator(subst(bernpol(n, x), x, 1))); \\ _Michel Marcus_, Oct 14 2023 %Y A366426 Cf. A366168/A027642, A366427 (denominator), A366570/A366152 (1st derivative). %K A366426 nonn,frac %O A366426 0,15 %A A366426 _Peter Luschny_, Oct 13 2023