login
a(n) = n - digital sum(n+1)
0

%I #4 May 19 2018 14:53:26

%S -1,-1,-1,-1,-1,-1,-1,-1,8,8,8,8,8,8,8,8,8,8,17,17,17,17,17,17,17,17,

%T 17,17,26,26,26,26,26,26,26,26,26,26,35,35,35,35,35,35,35,35,35,35,44,

%U 44,44,44,44,44,44,44,44,44,53,53,53,53,53,53,53,53,53,53,62,62,62,62,62

%N a(n) = n - digital sum(n+1)

%C a(8)=8-ds(9)=8-9=-1; a(15)=15-ds(16)=15-(1+6)=15-7= 8; a(26)=26-ds(27)=26-(2+7)=26-9=17

%t Table[n-Total[IntegerDigits[n+1]],{n,80}] (* _Harvey P. Dale_, May 19 2018 *)

%K base,sign

%O 1,9

%A _Claudio Meller_, May 30 2009