login
A211675
Exponent of powers of 2 occurring in A211673.
3
0, 2, 3, 4, 4, 4, 5, 5, 5, 6, 6, 6, 6, 6, 6, 6, 6, 7, 7, 7, 7, 7, 7, 7, 8, 7, 7, 8, 7, 7, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 9, 8, 8, 8, 8, 9, 8, 9, 8, 8, 8, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 10, 9, 9, 9, 9, 9, 10, 9, 9, 9
OFFSET
1,2
MATHEMATICA
Table[k = 1; While[! IntegerQ[q = Log[2, Prime[n+k] - Prime[k]]], k++]; q, {n, 100}]
CROSSREFS
Sequence in context: A087793 A030411 A194817 * A239683 A132913 A278814
KEYWORD
nonn
AUTHOR
T. D. Noe, Apr 23 2012
STATUS
approved