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 A284801 #4 Apr 05 2017 07:50:53 %S A284801 4,3,2,1,0,23,18,13,8,3,22,17,12,7,2,21,16,11,6,1,20,15,10,5,0,123,98, %T A284801 73,48,23,118,93,68,43,18,113,88,63,38,13,108,83,58,33,8,103,78,53,28, %U A284801 3,122,97,72,47,22,117,92,67,42,17,112,87,62,37,12,107,82 %N A284801 Write in base k, complement, reverse. Case k = 5. %e A284801 a(11) = 17 because 11 in base 5 is 21, its complement in base 5 is 23 and the digit reverse is 32 that is 17 in base 10. %p A284801 P:=proc(q,h) local a,b,k,n; print(h-1); for n from 1 to q do a:=convert(n,base,h); b:=0; %p A284801 for k from 1 to nops(a) do a[k]:=h-1-a[k]; b:=h*b+a[k]; od; print(b); od; end: P(10^2,5); %Y A284801 Cf. A036044, A267193, A284802. %K A284801 nonn,base,easy %O A284801 0,1 %A A284801 _Paolo P. Lava_, Apr 03 2017