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.

A201146 Triangle read by rows: T(n,k) = (n#)/(k#), 1 <= k <= n.

This page as a plain text file.
%I A201146 #23 Aug 03 2014 14:27:53
%S A201146 1,2,1,6,3,1,6,3,1,1,30,15,5,5,1,30,15,5,5,1,1,210,105,35,35,7,7,1,
%T A201146 210,105,35,35,7,7,1,1,210,105,35,35,7,7,1,1,1,210,105,35,35,7,7,1,1,
%U A201146 1,1,2310,1155,385,385,77,77,11,11,11,11,1,2310,1155,385,385
%N A201146 Triangle read by rows: T(n,k) = (n#)/(k#), 1 <= k <= n.
%C A201146 Row sums give A201156.
%C A201146 Central terms give A068111: T(2*n-1,n) = A068111(n).
%C A201146 T(n,1) = A034386(n).
%C A201146 T(n,n-1) = A089026(n) for n > 1.
%C A201146 T(n,n) = A000012(n).
%C A201146 Let n > 1 and p = A000040(n). Then T(p,p-1) = T(p+1,p-1) = p.
%C A201146 T(2*n-1,n-1) = A073838(n) for n > 1.
%C A201146 T(2*n,n+1) = A144186(n).
%H A201146 Arkadiusz Wesolowski, <a href="/A201146/b201146.txt">Rows n = 1..141 of triangle, flattened</a>
%e A201146 1:                                   1
%e A201146 2:                               2       1
%e A201146 3:                           6       3       1
%e A201146 4:                       6       3       1       1
%e A201146 5:                   30      15      5       5       1
%e A201146 6:               30      15      5       5       1       1
%e A201146 7:           210     105     35      35      7       7       1
%e A201146 8:       210     105     35      35      7       7       1       1
%e A201146 9:   210     105     35      35      7       7       1       1       1
%t A201146 lst = {}; Do[AppendTo[lst, Product[Prime[i], {i, PrimePi[n]}]/Product[Prime[i], {i, PrimePi[k]}]], {n, 12}, {k, n}]; lst (* _Arkadiusz Wesolowski_, Dec 02 2011 *)
%Y A201146 Cf. A034386.
%K A201146 nonn,tabl
%O A201146 1,2
%A A201146 _Arkadiusz Wesolowski_, Nov 27 2011