|
Search: id:A065079
|
|
|
| A065079 |
|
Primes for which the alternating bit sum (A065359) is not equal to 1 or 2. |
|
+0 1
|
|
| 11, 41, 43, 47, 59, 107, 131, 137, 139, 163, 167, 173, 179, 191, 227, 233, 239, 251, 277, 337, 349, 373, 419, 431, 443, 491, 521, 523, 547, 557, 563, 569, 571, 587, 617, 619, 641, 643, 647, 653, 659, 673, 677, 683, 691, 701, 719, 739, 743, 751, 761, 809
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
COMMENT
|
Differs from A065049 beginning with 683.
|
|
REFERENCES
|
William Paulsen, wpaulsen(AT)csm.astate.edu, personal communication.
|
|
EXAMPLE
|
11 is in the sequence because 11d = 1011b, so the alternating digits sum of 11 is 1 -1 +0 -1 = -1 which is neither 1 nor 2.
|
|
MATHEMATICA
|
Do[d = Reverse[ IntegerDigits[ Prime[n], 2]]; l = Length[d]; s = 0; k = 1; While[k < l + 1, s = s - (-1)^k*d[[k]]; k++ ]; If[s != 1 && s != 2, Print[ Prime[n]]], {n, 3, 141} ]
|
|
CROSSREFS
|
Cf. A065049.
Sequence in context: A089348 A088622 A121171 this_sequence A065049 A122015 A078653
Adjacent sequences: A065076 A065077 A065078 this_sequence A065080 A065081 A065082
|
|
KEYWORD
|
base,nonn
|
|
AUTHOR
|
Robert G. Wilson v (rgwv(AT)rgwv.com), Nov 08 2001
|
|
|
Search completed in 0.002 seconds
|