|
Search: id:A069204
|
|
|
| A069204 |
|
Emirps congruent to their reversal mod 4. |
|
+0
1
|
|
| 37, 73, 149, 179, 199, 337, 347, 733, 743, 941, 971, 991, 1009, 1021, 1033, 1061, 1069, 1097, 1103, 1151, 1201, 1213, 1217, 1229, 1237, 1249, 1399, 1409, 1429, 1453, 1511, 1523, 1559, 1583, 1601, 1657, 1669, 1723, 1979, 3011, 3019, 3023, 3067, 3083
(list; graph; listen)
|
|
|
OFFSET
|
0,1
|
|
|
EXAMPLE
|
179 and 971 are both congruent to 3 (mod 4); 337 and 733 are both congruent to 1 (mod 4).
|
|
MATHEMATICA
|
f[n_] := ToExpression[ StringReverse[ ToString[n]]]; Select[ Range[4000], PrimeQ[f[ # ]] && PrimeQ[ # ] && f[ # ] != # && Mod[ #, 4] == Mod[f[ # ], 4] &]
|
|
CROSSREFS
|
Cf. A006567.
Adjacent sequences: A069201 A069202 A069203 this_sequence A069205 A069206 A069207
Sequence in context: A039420 A043243 A044023 this_sequence A128388 A137833 A083748
|
|
KEYWORD
|
base,nonn
|
|
AUTHOR
|
Lekraj Beedassy (blekraj(AT)yahoo.com), Apr 11 2002
|
|
EXTENSIONS
|
More terms from Jason Earls (jcearls(AT)cableone.net) and Robert G. Wilson v (rgwv(AT)rgwv.com), Apr 14 2002
|
|
|
Search completed in 0.002 seconds
|
