|
|
A127962
|
|
Binary expansion of A000979(n).
|
|
8
|
|
|
11, 1011, 101011, 1010101011, 101010101011, 1010101010101011, 101010101010101011, 1010101010101010101011, 101010101010101010101010101011, 101010101010101010101010101010101010101011
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
FORMULA
|
|
|
MATHEMATICA
|
b[n_] := FromDigits[IntegerDigits[n, 2]]; b /@ Select[Table[(2^p + 1)/3, {p, Prime[Range[15]]}], PrimeQ] (* Amiram Eldar, Jul 23 2023 *)
|
|
PROG
|
(Python)
from gmpy2 import divexact
from sympy import prime, isprime
A127962 = [int(bin(p)[2:]) for p in (divexact(2**prime(n)+1, 3) for n in range(2, 10**2)) if isprime(p)] # Chai Wah Wu, Sep 04 2014
|
|
CROSSREFS
|
Cf. A000978, A000979, A007088, A124400, A126614, A127936, A127955, A127956, A127957, A127958, A127961.
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|