

A113916


Numbers n such that (p^n1)/(p1) is prime where p is the nth prime.


0




OFFSET

1,1


COMMENTS

Note that n must itself be a prime.


LINKS



MATHEMATICA

Do[ p = Prime[n]; If[PrimeQ[(p^n  1)/(p  1)], Print[n]], {n, 1800}] (* Robert G. Wilson v *)


CROSSREFS



KEYWORD

nonn


AUTHOR

Joao da Silva (zxawyh66(AT)yahoo.com), Jan 30 2006


STATUS

approved



