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 A110738 #8 Aug 09 2015 00:34:31 %S A110738 1,3,4,3,6,5,8,3,4,9,12,5,14,13,16,3,18,5,20,3,4,21,24,5,6,25,4,13,30, %T A110738 11,32,3,34,33,36,5,38,37,16,3,42,5,44,21,16,45,48,5,8,9,52,5,54,5,16, %U A110738 13,7,57,60,7,62,61,4,3,66,23,68,13,70,29,72,5,74,73,16,37,78,17,80,3 %N A110738 a(n) = common ratio for row n in A112668. %p A110738 A110738 := proc(n) local a ; if n = 1 then RETURN(1) ; else a := 2 ; while (1-a^n)/(1-a) mod n <> 0 do a := a+1 ; od ; RETURN(a) ; fi ; end: for n from 1 to 80 do printf("%d, ",A110738(n)) : od : # _R. J. Mathar_, Mar 13 2007 %Y A110738 Cf. A110737, A110739. %Y A110738 Cf. A074792, A083503. %K A110738 easy,nonn %O A110738 1,2 %A A110738 _Amarnath Murthy_, Aug 10 2005 %E A110738 More terms from _R. J. Mathar_, Mar 13 2007