|
Search: id:A118494
|
|
|
| A118494 |
|
Palindromic primes that are not Chen primes. |
|
+0
1
|
|
| 151, 313, 373, 383, 727, 757, 929, 10501, 11311, 12421, 13831, 14341, 15451, 17971, 18181, 18481, 19391, 19891, 30103, 30203, 30403, 30703, 30803, 31513, 32323, 32423, 33533, 34543, 34843, 35053, 35153, 35353, 36563, 37273, 37573, 38083
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
MAPLE
|
# Check if number is Chen prime ischenprime:=proc(n); if (isprime(n) = 'true') then if (isprime(n+2) = 'true' or numtheory[bigomega](n+2) = 2) then return 'true' else return 'false' fi fi end: # Check if number is palindrome ts_numpal:=proc(n) local ad; ad:=convert(n, base, 10): if (ListTools[Reverse](ad)=ad) then return 'true' else return 'false' fi end: ts_pal_nonchen:=proc(n) local i, ans; ans:=[ ]: for i from 1 to n do if (ischenprime(i) = 'false' and ts_numpal(i) = 'true') then ans:=[op(ans), i]: fi od: return ans end: ts_pal_nonchen(100000);
|
|
CROSSREFS
|
Cf. A002385, A109574, A109611.
Adjacent sequences: A118491 A118492 A118493 this_sequence A118495 A118496 A118497
Sequence in context: A059858 A070182 A031893 this_sequence A108842 A078858 A078967
|
|
KEYWORD
|
nonn,base,less
|
|
AUTHOR
|
Jani Melik (jani_melik(AT)hotmail.com), May 05 2006
|
|
|
Search completed in 0.002 seconds
|
