A139803 A033875(n) + 2^a(n) = A033875(n+1).

0, 1, 1, 2, 1, 2, 1, 2, 3, 4, 5, 2, 7, 4, 1, 2, 3, 4, 9, 2, 955, 468

Offset

1,4

Comments

a(23) > 10^4. - Zak Seidov, Jan 24 2017

a(23) > 30000 (if it exists). - Pontus von Brömssen, Jan 08 2023

Links

Table of n, a(n) for n=1..22.

Formula

a(n) = A067760((A033875(n)-1)/2) for n >= 2. - Pontus von Brömssen, Jan 08 2023

Example

a(10) = 4 because A033875(10) = 31, 31 + 2^4 = 47, which is prime.

Mathematica

p = 2; n = 0; While[true, x = 0; While[ ! PrimeQ[p + 2^x], x++ ]; p = p + 2^x; Print[x]; n++ ]

Crossrefs

Skipping from prime to prime by least powers of 2: A033875.

Cf. A059662, A067760.

Sequence in context: A234022 A261273 A097454 * A058746 A080916 A071622

Adjacent sequences: A139800 A139801 A139802 * A139804 A139805 A139806

Keyword

nonn,more

Author

Johan Särnbratt, May 22 2008

Status

approved