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 A071118 #10 Feb 12 2014 03:55:54 %S A071118 2,4,12,16,40,24,84,64,108,80,220,96,312,168,240,256,544,216,684,320, %T A071118 504,440,1012,384,1000,624,972,672,1624,480,1860,1024,1320,1088,1680, %U A071118 864,2664,1368,1872,1280,3280,1008,3612,1760,2160,2024,4324,1536 %N A071118 Size of the automorphism group of the group Z X Z_n. %C A071118 This automorphism group is isomorphic to Z_2 X G where G is the group described in A002618. %F A071118 a(n) = 2 * A002618(n) = 2 * n * Phi(n). %p A071118 with(numtheory); A071118:=n->2*n*phi(n); seq(A071118(n), n=1..40); # _Wesley Ivan Hurt_, Feb 11 2014 %t A071118 Table[ 2n*EulerPhi[n], {n, 1, 45}] %o A071118 (PARI) for(n=1,100,print1(2*n*eulerphi(n),",")) %Y A071118 Cf. A002618, A000010. %K A071118 nonn %O A071118 1,1 %A A071118 Sharon Sela (sharonsela(AT)hotmail.com), May 28 2002 %E A071118 Edited by _Robert G. Wilson v_ and _Benoit Cloitre_, May 28 2002