OFFSET
1,1
LINKS
Rémy Sigrist, Table of n, a(n) for n = 1..10000
PROG
(PARI) s = 0; v = 2; for (n=1, 101, print1 (#binary(v) ", "); s += 2^v; forprime (p=2, oo, if (!bittest(s, p) && hammingweight(bitxor(p, v))<=2, v = p; break))) \\ Rémy Sigrist, May 27 2018
CROSSREFS
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, May 27 2018
STATUS
approved