A089223 - OEIS

The OEIS is supported by the many generous donors to the OEIS Foundation.

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

Other ways to Give

A089223

a(n) = floor(Product_{i=1..n} log(prime(i+1))/log(i+1)).

1, 2, 3, 4, 6, 10, 14, 20, 29, 42, 62, 90, 128, 182, 261, 376, 535, 764, 1087, 1532, 2166, 3052, 4311, 6128, 8680, 12207, 17118, 23849, 33148, 46761, 65779, 92558, 129518, 182289, 255222, 357379, 500442, 699118, 976654, 1364261, 1897468, 2649692

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,2

LINKS

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

MATHEMATICA

f[n_]=Log[Prime[n+1]]/Log[n+1] g[n_]=Product[f[i], {i, 1, n}] digits=100 a=Table[Floor[g[n]], {n, 1, digits}]

CROSSREFS

Sequence in context: A318558 A347867 A256248 * A240057 A279467 A094861

Adjacent sequences: A089220 A089221 A089222 * A089224 A089225 A089226

KEYWORD

nonn

AUTHOR

Roger L. Bagula, Dec 10 2003

EXTENSIONS

Edited by N. J. A. Sloane, Nov 26 2015

STATUS

approved