A137292 Limiting sequence when we start with the positive integers and at step n >= 1 delete the term at position n + digitsum(a(n)).

1, 3, 4, 5, 7, 8, 10, 13, 14, 15, 17, 20, 21, 24, 26, 28, 30, 31, 32, 35, 36, 39, 40, 43, 44, 45, 48, 49, 51, 52, 54, 56, 58, 59, 62, 63, 66, 67, 69, 71, 72, 73, 76, 77, 80, 82, 83, 86, 87, 90, 91, 94, 96, 97, 99, 102, 103, 105, 108, 111, 114, 115, 119, 121, 122, 124, 128

Offset: 1

Author

Ctibor O. Zizka, Mar 15 2008, Mar 17 2008

Keywords

• easy
• nonn
• base

Examples

			First few steps are:
1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,...
n = 1; delete term at position 1+digitsum(1) = 2: 2;
1,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,...
n = 2; delete term at position 2+digitsum(3) = 5: 6;
1,3,4,5,7,8,9,10,11,12,13,14,15,16,17,18,19,20,...
n = 3; delete term at position 3+digitsum(4) = 7: 9;
1,3,4,5,7,8,10,11,12,13,14,15,16,17,18,19,20,...
n = 4; delete term at position 4+digitsum(5) = 9: 12;
1,3,4,5,7,8,10,11,13,14,15,16,17,18,19,20,...
n = 5; delete term at position 5+digitsum(7) = 12: 16;
1,3,4,5,7,8,10,11,13,14,15,17,18,19,20,...
n = 6; delete term at position 6+digitsum(8) = 14: 19;
1,3,4,5,7,8,10,11,13,14,15,17,18,20,...
n = 7; delete term at position 7+digitsum(10) = 8: 11;
1,3,4,5,7,8,10,13,14,15,17,18,20,...
		

Crossrefs

Cf. A000959 (lucky numbers), A138662.

Extensions

Edited, corrected and extended by Klaus Brockhaus, Mar 25 2008