|
%I #5 Feb 06 2015 13:02:15
%S 10,9,8,7,6,5,4,3,2,1,90,89,88,87,86,85,84,83,82,81,80,79,78,77,76,75,
%T 74,73,72,71,70,69,68,67,66,65,64,63,62,61,60,59,58,57,56,55,54,53,52,
%U 51,50,49,48,47,46,45,44,43,42,41,40,39,38,37,36,35,34,33,32,31,30,29,28
%N 10's complement of nonnegative numbers.
%C Apart from the initial a(0) a duplicate of A089186. [From _R. J. Mathar_, Jun 25 2010]
%F a(n) = 10^k - n where k is the number of digits in n.
%e a(11) = 10's complement of 11 = 89
%t Join[{10},Table[10^IntegerLength[n]-n,{n,80}]] (* _Harvey P. Dale_, Feb 06 2015 *)
%K base,easy,nonn
%O 0,1
%A _Amarnath Murthy_, Jun 23 2010
|
