login
A190426
First differences of A132271 not in A132271.
1
12, 23, 45, 56, 67, 89, 100, 244, 266, 288, 310, 332, 376, 398, 420, 696, 762, 795, 828, 861, 894, 927, 1222, 1368, 1412, 1456, 1500, 1544, 1588, 1632, 1676, 1720, 2260, 2315, 2370, 2425, 2480, 2535, 2590, 2645, 2700, 3372, 3438, 3504, 3570, 3636, 3702, 3768, 3834, 3900
OFFSET
1,1
LINKS
MATHEMATICA
f[n_] := Block[{k = 0, p = 1}, While[a = Floor[n/10^k]; a > 0, p *= 1 + a; k++]; p]; t = Array[f, 591, 0]; Take[ Complement[ Union[ Rest@ t - Most@ t], t], 50]
CROSSREFS
Cf. A132271.
Sequence in context: A045532 A255729 A341740 * A207539 A083683 A294139
KEYWORD
easy,nonn
AUTHOR
Robert G. Wilson v, May 10 2011
STATUS
approved