%I#26 2022年11月8日11:23:01

%S 0,1,0,1,0，1,0，1,0,0,10,10,11,10,11,10,11,10,11,0,11,0,11,0，

%T 1,10,11,10,11,10,11,10,11,10,11,110,11,0,11,0,1,0,10,11_0,11,10，

%U 11,10,11,10,11,0,11,0,0,1,0,1,10,10,11,10,11_10,11,10,11,10,11,0,11,0

%N在N的十进制表示中：用0替换所有偶数，用1替换所有奇数。

%H Reinhard Zumkeller，n表，n=0..9999的a（n）</a>

%F n=总和（d（k）*10^k：0<=d。

%F a（A014263（n））=0.-_Reinhard Zumkeller，2011年10月4日

%e 199->'111'：a（199）=111；200->“000”：a（200）=0；

%e 299->'011'：a（299）=11；300->'100'：a（300）=100。

%t表[FromDigits[If[EvenQ[#]，0,1]&/@IntegerDigits[n]]，{n，0,90}]（*_哈维·P·戴尔，2022年11月8日*）

%o（哈斯克尔）

%o导入数据。列表（展开器）；导入数据。元组（交换）

%o a103181_list=映射a103181[0..]

%o a103181 n=折叠f 0$反向$展开器g n，其中

%o f v d=10*v+mod d 2

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

%o——_ Inhard Zumkeller_，2011年10月4日

%o（PARI）a（n）=subst（Pol（apply（k->k%2，digits（n））），'x，10）\\查尔斯·格里特豪斯IV_，2013年7月16日

%o（Python）

%o定义A103181（n）：return int（“”.join（str（int（d）%2）for d in str（n）））#_Chai Wah Wu_，2022年4月9日

%Y参考A000035、A014263。

%K nonn，基础，简单

%O 0,11号

%A _Reinhard Zumkeller，2005年3月18日