A139107 Bisection of A139102.

1, 9, 599, 38359, 2454999, 628479869, 643563386359, 41188056726999, 168706280353789919, 43188807770570219359, 2764083697316494039005, 2830421706052089895941623, 46373629231957440855107559295

Offset

1,2

Links

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

Maple

A139101 := proc(n) option remember ; local a, p; if n = 1 then RETURN(1); else a := 10*A139101(n-1) ; for p from ithprime(n-1)+1 to ithprime(n)-1 do a := 10*a+1 ; od: fi ; RETURN(a) ; end: bin2dec := proc(n) local nshft ; nshft := convert(n, base, 10) ; add(op(i, nshft)*2^(i-1), i=1..nops(nshft) ) ; end: A139102 := proc(n) bin2dec(A139101(n)) ; end: A139107 := proc(n) A139102(2*n-1) ; end: seq(A139107(n), n=1..35) ; # R. J. Mathar, Apr 25 2008

Crossrefs

Cf. A139102.

Sequence in context: A238609 A015092 A332159 * A226552 A277232 A171703

Adjacent sequences: A139104 A139105 A139106 * A139108 A139109 A139110

Keyword

nonn

Author

Omar E. Pol, Apr 08 2008

Extensions

More terms from R. J. Mathar, Apr 25 2008

Status

approved