|
| |
|
|
A154703
|
|
Concatenation of the first n primes written in base 2.
|
|
5
| |
|
|
10, 1011, 1011101, 1011101111, 10111011111011, 1011101111101110001, 1011101111101110001, 101110111110111000110011, 10111011111011100011001110111, 1011101111101110001100111011111101
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
COMMENTS
| Number of bits in a(n) = SUM[i=1..n] A035100(i) = 2, 4, 7, 10, 14, 18, 23, 28, 33, 38, 43, 49, 55, 61, 67, 73, 79, 85, 92, ....
|
|
|
FORMULA
| a(n) = CONCATENATE[i=1..n] A004676(i) = CONCATENATE[i=1..n] A007088(A000040(i)). a(1) = 10, a(n+1) = a(n) CONCATENATE A007088(A000040(i)).
|
|
|
EXAMPLE
| a(2) = 1011 = 10 Concat 11 = (2 base 2) Concat (3 base 2).
|
|
|
MAPLE
| A154703 := proc(n) option remember: local d: if(n=1)then return 10: fi: d:=convert(ithprime(n), base, 2): return parse(cat(convert(procname(n-1), string), convert(op(convert(d, base, 10, 10^nops(d))), string))): end: seq(A154703(n), n=1..10); # Nathaniel Johnston, May 27 2011
|
|
|
CROSSREFS
| Cf. A000040, A004676, A007088, A035100.
Sequence in context: A138484 A022506 A127117 * A172163 A174768 A067104
Adjacent sequences: A154700 A154701 A154702 * A154704 A154705 A154706
|
|
|
KEYWORD
| base,easy,nonn
|
|
|
AUTHOR
| Jonathan Vos Post (jvospost3(AT)gmail.com), Jan 14 2009
|
| |
|
|
