

A109372


Numbers k such that k * (sum of the digits of k raised to their own power) + 1 is prime.


2



1, 11, 12, 20, 33, 34, 35, 36, 52, 64, 75, 79, 84, 94, 95, 102, 104, 110, 112, 121, 138, 163, 167, 170, 174, 184, 192, 200, 217, 231, 235, 246, 250, 255, 256, 321, 336, 343, 352, 354, 365, 390, 394, 414, 415, 420, 422, 438, 440, 446, 450, 455, 462, 471, 474
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,2


COMMENTS

A zero digit raised to the zeroth power is treated as equaling one.  Harvey P. Dale, Feb 19 2013


LINKS

Eric M. Schmidt, Table of n, a(n) for n = 1..1000


EXAMPLE

a(7)=35 because 35*(3^3 + 5^5) + 1 = 110321 is prime.


MATHEMATICA

ndnQ[n_]:=Module[{idn=IntegerDigits[n]/.{0>1}}, PrimeQ[n*Total[idn^idn]+1]]; Select[Range[500], ndnQ] (* Harvey P. Dale, Feb 19 2013 *)


PROG

(PARI) isok(n) = my(d = digits(n)); isprime(n*sum(i=1, #d, d[i]^d[i])+1); \\ Michel Marcus, Sep 16 2018


CROSSREFS

Cf. A045503.
Sequence in context: A092096 A057303 A121979 * A066686 A125887 A303446
Adjacent sequences: A109369 A109370 A109371 * A109373 A109374 A109375


KEYWORD

base,easy,nonn


AUTHOR

Jason Earls, Aug 24 2005


STATUS

approved



