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.

A344008 Triangle of numerators corresponding to A344007.

This page as a plain text file.
%I A344008 #21 Jun 10 2021 16:11:52
%S A344008 1,1,1,1,1,1,1,1,1,1,2,1,1,1,1,1,2,1,1,1,1,1,3,2,1,1,1,1,3,1,3,1,2,1,
%T A344008 1,1,1,3,1,3,1,1,2,1,1,1,1,3,1,1,3,1,1,2,1,4,1,1,3,1,1,1,3,1,1,2,1,4,
%U A344008 1,1,3,1,1,1,1,3,1,1,5,1,4,1,1,3,1,1,1,1,1,3,1
%N A344008 Triangle of numerators corresponding to A344007.
%e A344008 The triangle underlying A344007 begins:
%e A344008   1
%e A344008   1/2,   1/2
%e A344008   1/6,   1/3,   1/2
%e A344008   1/6,   1/4,   1/4,   1/3
%e A344008   2/15,  1/6,   1/5,   1/4,   1/4
%e A344008   1/12,  2/15,  1/6,   1/6,   1/5,   1/4
%e A344008   1/12,  3/28,  2/15,  1/7,   1/6,   1/6,   1/5
%e A344008   3/40,  1/12,  3/28,  1/8,   2/15,  1/7,   1/6,   1/6
%e A344008   1/18,  3/40,  1/12,  3/28,  1/9,   1/8,   2/15,  1/7,  1/6
%e A344008   1/18,  1/15,  3/40,  1/12,  1/10,  3/28,  1/9,   1/8,  2/15,  1/7
%e A344008   ...
%e A344008 The numerators are:
%e A344008   1
%e A344008   1, 1
%e A344008   1, 1, 1
%e A344008   1, 1, 1, 1
%e A344008   2, 1, 1, 1, 1
%e A344008   1, 2, 1, 1, 1, 1
%e A344008   1, 3, 2, 1, 1, 1, 1
%e A344008   3, 1, 3, 1, 2, 1, 1, 1
%e A344008   1, 3, 1, 3, 1, 1, 2, 1, 1
%e A344008   1, 1, 3, 1, 1, 3, 1, 1, 2, 1
%e A344008   ...
%o A344008 (PARI) lista(nn) = {my(row, nrow, drow); for (n=1, nn, if (n==1, row = [1], k = vecmax(row); nrow = row; nrow[n-1] = 1/n; nrow = concat(nrow, k - 1/n); row = vecsort(nrow);); drow = apply(numerator, row); for (k=1, #drow, print1(drow[k], ", ")););} \\ _Michel Marcus_, Jun 09 2021
%Y A344008 Cf. A003506, A344007.
%K A344008 nonn,tabl
%O A344008 1,11
%A A344008 _Evan Lee_, Jun 09 2021
%E A344008 Corrected by _Hugo Pfoertner_ and _Michel Marcus_, Jun 09 2021