cp's OEIS Frontend

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.

A085503 Sub-triangle of A008292: take every second term of every second row.

This page as a plain text file.
%I A085503 #28 Aug 31 2021 04:22:23
%S A085503 1,1,1,1,66,1,1,1191,1191,1,1,14608,156190,14608,1,1,152637,9738114,
%T A085503 9738114,152637,1,1,1479726,423281535,2275172004,423281535,1479726,1,
%U A085503 1,13824739,15041229521,311387598411
%N A085503 Sub-triangle of A008292: take every second term of every second row.
%H A085503 Claire Levaillant, <a href="https://arxiv.org/abs/2001.03471">Powers of two weighted sum of the first p divided Bernoulli numbers modulo p</a>, arXiv:2001.03471 [math.CO], 2020. See p. 6.
%e A085503 {1},
%e A085503 {1, 1},
%e A085503 {1, 66, 1},
%e A085503 {1, 1191, 1191, 1},
%e A085503 {1, 14608, 156190, 14608, 1},
%e A085503 {1, 152637, 9738114, 9738114, 152637, 1},
%t A085503 << DiscreteMath`Combinatorica`
%t A085503 a = Table[Table[Eulerian[n + 1, 2*m], {m, 0, Floor[n/2]}], {n, 0, 20, 2}];
%t A085503 Flatten[%]
%Y A085503 Cf. A008292.
%K A085503 nonn,tabl
%O A085503 0,5
%A A085503 _Roger L. Bagula_, Dec 13 2010