OFFSET
1,2
MAPLE
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
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Amarnath Murthy, Aug 10 2005
EXTENSIONS
More terms from R. J. Mathar, Mar 13 2007
STATUS
approved