login
A052494
Number of different primes that can be formed by permuting digits of n-th prime.
1
1, 1, 1, 1, 1, 2, 2, 1, 1, 1, 2, 2, 1, 1, 1, 1, 1, 1, 1, 2, 2, 2, 1, 1, 2, 1, 1, 2, 1, 3, 2, 3, 3, 2, 4, 1, 3, 3, 3, 3, 4, 2, 2, 2, 4, 3, 1, 1, 1, 1, 1, 2, 2, 2, 1, 1, 1, 2, 2, 2, 2, 2, 1, 3, 2, 3, 2, 3, 2, 2, 1, 3, 2, 3, 4, 1, 3, 4, 1, 1, 4, 2, 1, 1, 2, 1, 1, 2, 2, 2, 2, 2, 1, 4, 1, 1, 1, 2, 1, 1, 2, 1, 2, 2, 3
OFFSET
2,6
COMMENTS
Leading zeros not permitted, so, e.g., prime(27) = 103 but a(27) = 1 even though 13 and 31 are both primes. - Harvey P. Dale, Dec 17 2012
EXAMPLE
a(75)=4 because the digits in 379 may be arranged to form a total of 4 primes: 379, 397, 739 and 937.
MATHEMATICA
ndp[n_]:=Module[{pers=FromDigits/@Permutations[IntegerDigits[n]]}, Count[ pers, _?(IntegerLength[#]==IntegerLength[n]&&PrimeQ[#]&)]]; ndp/@ Prime[ Range[110]] (* Harvey P. Dale, Dec 17 2012 *)
CROSSREFS
KEYWORD
base,easy,nonn
AUTHOR
Enoch Haga, Mar 16 2000
STATUS
approved