OFFSET
1,1
COMMENTS
Values of Sum_{k=1..n} d(r(k)) for the terms of the sequence: 1, 26322, 28666, 221869, 263274, 286714, 328119, 1257805, 2218744, 2632794, 2867194, 3281244, 4242180, 22187494, 26327994, 28671994, 32812494, 200976555, 221874994, 263279994, ...
52656*10^j - 1, 57344*10^j - 1, 443750*10^j - 1 and 656250*10^j - 1 are terms for j >= 0 (see comment in A275573). Terms that are not of this form are: 4, 2515624, 8484374, 401953124, 698046874, ... - Chai Wah Wu, Sep 19 2016
FORMULA
A275573(n) = Sum_{k=1..a(n)} d(r(k)) + a(n)*(a(n)+1)/2. - Chai Wah Wu, Sep 19 2016
EXAMPLE
0.1 + 0.2 + 0.3 + … + 0.35625 + 0.45625 + 0.55625 = 26322.
MAPLE
with(numtheory): T:=proc(w) local x, y, z; x:=w; y:=0; for z from 1 to ilog10(x)+1 do y:=10*y+(x mod 10); x:=trunc(x/10); od; y; end:
P:= proc(q) local a, n; a:=0; for n from 1 to q do a:=a+T(n)/10^(ilog10(n)+1); if type(a, integer) then print(n);
fi; od; end: P(10^9);
PROG
(Python)
from fractions import Fraction
A276718_list, q = [], 0
for i in range(1, 10**6):
s = str(i)
q += Fraction(int(s[::-1]), 10**len(s))
if q.denominator == 1:
A276718_list.append(i) # Chai Wah Wu, Sep 19 2016
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Paolo P. Lava, Sep 16 2016
EXTENSIONS
a(21)-a(27) from Chai Wah Wu, Sep 18 2016
a(28)-a(31) from Chai Wah Wu, Sep 19 2016
STATUS
approved