This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A222210 #13 Mar 31 2017 00:33:15
%S A222210 1,0,2,3,4,5,6,7,8,9,1,0,2,3,4,5,6,7,8,9,21,20,22,23,24,25,26,27,28,
%T A222210 29,31,30,32,33,34,35,36,37,38,39,41,40,42,43,44,45,46,47,48,49,51,50,
%U A222210 52,53,54,55,56,57,58,59,61,60,62,63,64,65,66,67,68,69,71,70,72,73,74,75
%N A222210 In the number n, replace all (decimal) digits '0' with '1' and vice versa.
%C A222210 The map which is applied to primes in A171013 and A175791.
%H A222210 Vincenzo Librandi, <a href="/A222210/b222210.txt">Table of n, a(n) for n = 0..1000</a>
%t A222210 a[n_] := IntegerDigits[n] /. {0 -> 1, 1 -> 0} // FromDigits; Table[a[n], {n, 0, 75}] (* _Jean-François Alcover_, Jun 11 2013 *)
%o A222210 (PARI) A222210(n,d=[1,0,2,3,4,5,6,7,8,9])=sum(i=1,#n=digits(n),d[n[i]+1]*10^(#n-i),!n) \\ N.B.: PARI's digits() function returns [] for 0.
%Y A222210 Cf. A171013, A175791; A048380.
%K A222210 nonn,base,easy
%O A222210 0,3
%A A222210 _M. F. Hasler_, Feb 12 2013