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 A185075 #17 Mar 18 2016 05:44:09
%S A185075 1,2,3,3,5,5,7,6,7,8,11,8,13,11,15,10,17,11,19,13,17,17,23,15,21,20,
%T A185075 19,18,29,21,31,18,33,26,35,18,37,29,31,24,41,23,43,28,35,35,47,27,43,
%U A185075 32,51,33,53,29,47,33,45,44,59,36,61,47,45,34,65,45,67
%N A185075 The number of distinct residues modulo n of {i^i: i=1,2...}.
%H A185075 David W. Wilson, <a href="/A185075/b185075.txt">Table of n, a(n) for n = 1..10099</a>
%t A185075 res[mod_] := Length[Union[Table[PowerMod[i,i,mod], {i, 1, mod + LCM[mod*CarmichaelLambda[mod]]}]]]; Table[res[n], {n, 100}]
%o A185075 (PARI) period(n) = lcm(n, znstar(n)[2]); \\ A174824
%o A185075 a(n) = {v = []; for (i=1, period(n), v = Set(concat(v, Mod(i, n)^i));); #v;} \\ _Michel Marcus_, Mar 18 2016
%Y A185075 Cf. A000312, A174824.
%K A185075 nonn
%O A185075 1,2
%A A185075 _José María Grau Ribas_, Jan 23 2012