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 A366152 #11 Oct 14 2023 13:12:07 %S A366152 1,2,6,1,30,1,42,1,10,1,66,1,2730,1,2,1,170,1,798,1,110,1,46,1,546,1, %T A366152 2,1,870,1,14322,1,170,1,2,1,1919190,1,2,1,4510,1,1806,1,46,1,94,1, %U A366152 1326,1,22,1,530,1,798,1,290,1,118,1,56786730,1,2,1,34,1,64722 %N A366152 a(n) = denominator(denominator(Bernoulli'(n, x)) / denominator(Bernoulli(n, 1))). %F A366152 a(n) = denominator(A324370(n) / A027642(n)). %p A366152 seq(denom(denom(diff(bernoulli(n, x), x))/denom(bernoulli(n, 1))), n = 0..66); %o A366152 (PARI) a(n) = denominator(lcm(apply(denominator, Vec(deriv(bernpol(n)))))/denominator(subst(bernpol(n, x), x, 1))); \\ _Michel Marcus_, Oct 14 2023 %Y A366152 Cf. A324370/A027642, A366570 (numerator), A366426/A366427 (2nd derivative). %K A366152 nonn,frac %O A366152 0,2 %A A366152 _Peter Luschny_, Oct 13 2023