login
A145382
Write the n-th prime in binary. Change all 0's to 1's and all 1's to 0's. a(n) is the decimal equivalent of the result.
3
1, 0, 2, 0, 4, 2, 14, 12, 8, 2, 0, 26, 22, 20, 16, 10, 4, 2, 60, 56, 54, 48, 44, 38, 30, 26, 24, 20, 18, 14, 0, 124, 118, 116, 106, 104, 98, 92, 88, 82, 76, 74, 64, 62, 58, 56, 44, 32, 28, 26, 22, 16, 14, 4, 254, 248, 242, 240, 234, 230, 228, 218, 204, 200, 198, 194, 180, 174
OFFSET
1,3
COMMENTS
a(n) = A035327(p(n)), where p(n) is the n-th prime.
FORMULA
a(n)=2^{1+floor(log[2](p(n)))}-n-1, where p(n) is the n-th prime. - Emeric Deutsch, Oct 19 2008
MAPLE
f:=proc(n) options operator, arrow: 2^(1+floor(log[2](n)))-n-1 end proc: seq(f(ithprime(n)), n=1..71); # Emeric Deutsch, Oct 19 2008
CROSSREFS
A171008 gives the binary expansions. Cf. A035327.
Sequence in context: A337451 A352737 A133168 * A192423 A368667 A359214
KEYWORD
base,nonn
AUTHOR
Leroy Quet, Oct 09 2008
EXTENSIONS
Extended by Emeric Deutsch, Oct 19 2008
STATUS
approved