|
|
A227825
|
|
Primes whose digits add to 10 and which have a 3 in the tens place.
|
|
0
|
|
|
37, 433, 631, 1531, 3331, 4231, 10333, 10531, 13033, 15031, 20233, 20431, 23131, 30133, 31033, 31231, 40231, 41131, 50131, 51031, 100333, 103231, 105031, 110233, 110431, 113131, 114031, 120331, 122131, 123031, 202231, 211231, 212131, 231031, 300331, 310231, 312031, 321031, 400033, 411031, 501031, 510031, 1000333
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
Is this sequence infinite?
|
|
REFERENCES
|
Peter Luschny, Posting to Sequence Fans Mailing List, Jul 25, 2013.
|
|
LINKS
|
|
|
MATHEMATICA
|
fQ[n_]:=Module[{idn=IntegerDigits[n]}, idn[[-2]]==3&&Total[idn]==10]; Select[Prime[Range[5, 80000]], fQ] (* Harvey P. Dale, Aug 15 2014 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|