|
| |
|
|
A158080
|
|
Primes such that largest digit even of n = largest digit even of n-th prime.
|
|
0
|
|
|
|
43, 239, 263, 491, 641, 727, 769, 787, 857, 967, 1013, 1021, 1087, 1223, 1229, 1231, 1237, 1249, 1259, 1279, 1283, 1291, 1297, 1327, 1423, 1543, 1549, 1619, 1657, 1663, 1667, 1669, 1693, 1697, 1699, 1789, 1811, 1823, 1831, 1847, 1861, 1867, 1871, 1873
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
1,1
|
|
|
COMMENTS
|
Primes p = prime(n) such that a largest even digit individually exists in the base-10 representation for n and p, and such that it also is the same for both. [From R. J. Mathar, May 19 2010]
|
|
|
LINKS
|
Table of n, a(n) for n=1..44.
|
|
|
MATHEMATICA
|
Transpose[Select[With[{no=300}, Thread[{Range[no], Prime[Range[no]]}]], Max[Select[IntegerDigits[First[#]], EvenQ]]==Max[Select[IntegerDigits[Last[#]], EvenQ]]>0&]][[2]] (* From Harvey P. Dale, Feb 14 2011 *)
|
|
|
CROSSREFS
|
Cf. A000027, A000040, A156851.
Sequence in context: A038479 A142334 A107697 * A142450 A202008 A142632
Adjacent sequences: A158077 A158078 A158079 * A158081 A158082 A158083
|
|
|
KEYWORD
|
nonn,base,less
|
|
|
AUTHOR
|
Juri-Stepan Gerasimov, Mar 12 2009
|
|
|
EXTENSIONS
|
Corrected (61, 163, 181 removed, 239, 263 inserted, 281, 283, 421 removed etc.) by R. J. Mathar, May 19 2010
|
|
|
STATUS
|
approved
|
| |
|
|
