login
A121699
a(n) = floor((prime(n+1)/prime(n))^n).
2
1, 2, 2, 6, 2, 5, 2, 4, 8, 1, 7, 3, 1, 3, 6, 5, 1, 5, 3, 1, 5, 2, 4, 7, 2, 1, 2, 1, 2, 33, 2, 4, 1, 10, 1, 4, 4, 2, 3, 3, 1, 9, 1, 2, 1, 14, 13, 2, 1, 2, 3, 1, 8, 3, 3, 3, 1, 3, 2, 1, 8, 18, 2, 1, 2, 17, 3, 7, 1, 2, 3, 4, 3, 3, 2, 3, 4, 2, 4, 6, 1, 6, 1, 3, 2, 3, 4, 2, 1, 2, 10, 4, 2, 4, 2, 3, 9, 1, 28, 3, 6
OFFSET
1,2
MATHEMATICA
A121699[n_] := Floor[(Prime[n + 1]/Prime[n])^n];
Array[A121699, 100] (* Paolo Xausa, May 05 2024 *)
CROSSREFS
Cf. A121700.
Sequence in context: A163370 A278159 A071796 * A080404 A247451 A167268
KEYWORD
easy,nonn
AUTHOR
Jason Earls, Aug 16 2006
STATUS
approved