OFFSET
1,11
COMMENTS
Composite entries are a(100)=25, a(120)=1205, a(144)=55969, a(156)=4069 etc.
MAPLE
A141498 := proc(n) A010696(n-1)* A086892(n) ; end: A027760 := proc(n) local s, p; s := 0 ; p := 2; while p <= n+1 do if n mod (p-1) = 0 then s := s+1/p; fi; p := nextprime(p) ; od: denom(s) ; end:
A141517 := proc(n) A141498(n)/A027760(n) ; end: seq(A141517(n), n=1..120) ; # R. J. Mathar, Sep 03 2009
CROSSREFS
KEYWORD
nonn
AUTHOR
Paul Curtz, Aug 11 2008
EXTENSIONS
Offset modified, extended by R. J. Mathar, Sep 03 2009
STATUS
approved