login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A121057 Triangle read by rows: T(n,m) = Prime[m]^n*(Prime[m] - 1)/2 1
1, 3, 9, 10, 50, 250, 21, 147, 1029, 7203, 55, 605, 6655, 73205, 805255, 78, 1014, 13182, 171366, 2227758, 28960854, 136, 2312, 39304, 668168, 11358856, 193100552, 3282709384, 171, 3249, 61731, 1172889, 22284891, 423412929, 8044845651 (list; table; graph; refs; listen; history; text; internal format)
OFFSET

1,2

COMMENTS

Row sums are 1, 12, 310, 8400, 885775, 31374252, 3487878712, 161343848880, 20713255606813, 6100254882852900, ...

First column is A008837. -  Michel Marcus, Apr 11 2013

LINKS

Table of n, a(n) for n=1..35.

EXAMPLE

Triangle begins

1;

3, 9;

10, 50, 250;

21, 147, 1029, 7203;

MATHEMATICA

t[n_, m_] = Prime[m]^n*(Prime[m] - 1)/2; a = Table[Table[t[n, m], {n, 1, m}], {m, 1, 10}] Flatten[a]

PROG

(PARI) trga(nrows) = {for (n=1, nrows, for (m=1, n, print1(prime(n)^m*(prime(n) - 1)/2, ", "); ); print(); ); }  \\ Michel Marcus, Apr 11 2013

CROSSREFS

Sequence in context: A004669 A173242 A228450 * A025538 A070354 A174565

Adjacent sequences:  A121054 A121055 A121056 * A121058 A121059 A121060

KEYWORD

nonn,tabl

AUTHOR

Roger L. Bagula, May 27 2007

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified September 15 12:44 EDT 2019. Contains 327078 sequences. (Running on oeis4.)