login
A137197
Decimal expansion of the sum of the reciprocals of the elements of A007908.
0
1, 0, 9, 2, 3, 6, 3, 7, 9, 1, 0, 9, 5, 1, 2, 2, 7, 8, 8, 8, 0, 1, 3, 8, 0, 4, 2, 4, 4, 8, 9, 0, 9, 7, 0, 5, 8, 8, 7, 1, 5, 0, 4, 6, 4, 4, 7, 1, 0, 8, 1, 4, 2, 4, 4, 2, 3, 8, 0, 5, 4, 9, 7, 5, 5, 0, 2, 2, 7, 2, 8, 4, 7, 3, 0, 1, 8, 8, 5, 5, 4, 8, 5, 9, 2, 0, 6, 0, 3, 6, 5, 9, 4, 6, 6, 2, 2, 8, 1, 3, 0
OFFSET
1,3
EXAMPLE
1 + 1/12 + 1/123 + 1/1234 + 1/12345 + 1/123456 + .....= 1.0923637910951227888013796063072721016963921894258793349801635199721622546190953748287037568512919456
MAPLE
> readlib(log10); P:=proc(n) local a, i, j, k; a:=1; k:=2; j:=1; for i from 1 by 1 to n do j:=j*10^(trunc(evalf(log10(k)))+1)+k; a:=a+1/j; k:=k+1; lprint(evalf(a, 101)); od; end: P(1000);
CROSSREFS
Cf. A007908.
Sequence in context: A160108 A011344 A257959 * A340826 A144981 A215267
KEYWORD
easy,nonn,cons
AUTHOR
STATUS
approved