%I#61 2023年1月16日11:17:26

%S 0，9，8，7，6，5，4，3，2，1，90，99，98，97，96，95，94，93，92，91，80，89，88，87，86，85，

%电话84,83,82,81,70,79,78,77,76,75,74,73,72,71,60,69,68,67,66,65,64,63,62，

%U 61,50,59,58,57,56,55,54,53,52,51,40,49,48,47,46,45,44,43,42,41,30,39

%N N的数字补码（将每个非零数字d替换为10-d）。

%在无进位算术模10中，C a（n）=-n，也就是说，n+a（n）=0（参见A169894）_N.J.A.Sloane，2010年8月3日

%H N.J.A.Sloane，N的表格，N=0..10000的A（N）</a>

%H David Applegate、Marc LeBrun和N.J.A.Sloane，<A href=“http://neilsloane.com/doc/carry1.pdf“>Carryless算术（I）：Mod 10版本。

%H<a href=“/index/Ca#CARRYLESS”>与无进位算术相关的序列的索引项</a>

%H<a href=“/index/Per#IntegerPermutation”>自然数排列序列的索引项</a>

%F From _Robert Israel_，2017年9月4日：（开始）

%F a（10*n）=10*a（n）。

%F a（10*n+j）=10*a（n）+10-j，对于1<=j<=9。

%F G.F.G（x）满足G（x）=10*（1+x+x^2+…+x^9）*G（x^10）+（9*x+8*x^2+7*x^3+6*x^4+5*x^5+4*x^6+3*x^7+2*x^8+x^ 9）/（1-x^ 10）。

%F（结束）

%e a（11）=99，因为每个数字的1+9=0模10。

%e a（20）=80，因为2+8=0 mod 10和0+0=0 mode 10。

%p f：=程序（n）局部t0，t1，i；

%p t0：=0；t1:=换算（n，基数，10）；

%i的p从1到nops（t1）do

%p如果t1[i]>0，则t0：=t0+（10-t1[i]）*10^（i-1）；fi；

%日期：

%p返回（t0）；

%p端；

%p#_N.J.A.Sloane，2011年1月21日

%t a[n_]：=从数字[整数数字[n]/。d？阳性->10-d]；表[a[n]，{n，0，100}]（*Jean-François Alcover_，2011年11月28日*）

%o（哈斯克尔）

%o a055120=文件夹f 0。相反。展开器g，其中

%o f v d=如果d==0，则10*v，否则10*v+10-d

%o g x=如果x==0，则无其他内容，仅$swap$divMod x 10

%o--_Reinhard Zumkeller_2011年10月4日

%o（PARI）a（n）=fromdigits（应用（d->如果（d，10-d，0），数字（n）））\\查尔斯·格里特豪斯IV_，2017年2月8日

%o（Python）

%o定义A055120（n）：如果d！='，则返回int（“”.join（str（10-int（d））2021年4月3日，str（n）））#_Chai Wah Wu_中，0’else d代表d

%Y参见A004488、A048647、A055115-A055126、A061601。

%A248813的Y列k=10。

%K基础，简单，漂亮，不

%O 0,2

%2000年4月19日，安利底特律