login
A090528
Primes arising in A090527.
3
2, 13, 23, 107, 4241, 6011, 212369, 2600137, 769230769, 16783039447, 49260223471, 43267872370321, 156507138388141, 10680338789777057, 348051774975651917, 1529094753948866477, 199727959773078870941, 32433109109185468674163
OFFSET
1,1
COMMENTS
Conjecture: No term is zero.
MATHEMATICA
Do[p = n^n; i = 1; While[ !ProvablePrimeQ[Floor[p/Prime[i]]], i++ ]; Print[Floor[p/Prime[i]]], {n, 2, 50}] (* Ryan Propper, Aug 02 2005 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Amarnath Murthy, Dec 07 2003
EXTENSIONS
More terms from Ryan Propper, Aug 02 2005
STATUS
approved