|
|
A070831
|
|
Palindromic primes with digit sum = 11.
|
|
1
|
|
|
191, 353, 13331, 1123211, 1221221, 1303031, 1311131, 3103013, 110232011, 111050111, 112030211, 112111211, 121111121, 130030031, 301111103, 10000900001, 10002520001, 10013131001, 10111311101, 10301110301
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
Conjecture: The sequence is unbounded.
|
|
LINKS
|
|
|
MATHEMATICA
|
Do[p = Join[ IntegerDigits[n], Reverse[ Drop[ IntegerDigits[n], -1]]]; q = Plus @@ p; If[ PrimeQ[ FromDigits[p]] && q == 11, Print[ FromDigits[p]]], {n, 1, 10^6}]
|
|
CROSSREFS
|
|
|
KEYWORD
|
base,nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|