login
A110739
Arithmetic mean of row n in A112668.
4
1, 2, 7, 10, 311, 651, 42799, 410, 9709, 43584805, 6140565047, 5086263, 4696537119847, 23436764200591, 5124095576030431, 1345210, 7563707819165039903, 52981906467, 14523213296398891966759, 87169610
OFFSET
1,2
FORMULA
For n > 1, a(n) = (A110738(n)^n-1)/(n*A110738(n)-n). - David Wasserman, Dec 12 2008
MAPLE
A110737 := proc(n) local i, 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( (1-a^n)/(1-a) ) ; fi ; end: A110739 := proc(n) A110737(n)/n ; end: for n from 1 to 25 do printf("%d, ", A110739(n)) : od : # R. J. Mathar, Mar 13 2007
CROSSREFS
Equals A110737(n)/n.
Sequence in context: A351240 A151346 A247166 * A179117 A133154 A100020
KEYWORD
easy,nonn
AUTHOR
Amarnath Murthy, Aug 10 2005
EXTENSIONS
More terms from R. J. Mathar, Mar 13 2007
STATUS
approved