|
|
|
|
1, 1001, 1001010111, 1001010111010111, 1001010111010111010111, 100101011101011101011101111101, 1001010111010111010111011111010111110111, 1001010111010111010111011111010111110111010111, 1001010111010111010111011111010111110111010111011111011111, 100101011101011101011101111101011111011101011101111101111101011111, 100101011101011101011101111101011111011101011101111101111101011111011101, 1001010111010111010111011111010111110111010111011111011111010111110111010111110111
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
FORMULA
|
|
|
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: A139105 := proc(n) A139101(2*n-1) ; end: seq(A139105(n), n=1..12) ; # R. J. Mathar, Apr 25 2008
|
|
CROSSREFS
|
|
|
KEYWORD
|
base,easy,nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|