This site is supported by donations to The OEIS Foundation.

 Annual Appeal: Please make a donation to keep the OEIS running. In 2018 we replaced the server with a faster one, added 20000 new sequences, and reached 7000 citations (often saying "discovered thanks to the OEIS"). Other ways to donate

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A113486 a(n) = A113166(n) - Fibonacci(n-1), where Fibonacci(n) = A000045(n). 1
 0, 0, 0, 1, 0, 3, 0, 4, 2, 7, 0, 13, 0, 14, 10, 21, 0, 39, 0, 52, 22, 65, 0, 137, 12, 156, 48, 267, 0, 483, 0, 652, 120, 1003, 50, 1849, 0, 2602, 300, 4329, 0, 7295, 0, 11086, 864, 17733, 0, 30125, 48, 46536, 1990, 75349, 0, 124683, 250, 197018, 5186, 317839, 0 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,6 COMMENTS This sequence appears to be nonnegative. However, a proof of this has not yet been found. LINKS G. C. Greubel, Table of n, a(n) for n = 1..1000 FORMULA For prime p, a(p) = 0 (see A113166 for details). MATHEMATICA a[n_] := Sum[ k/(n - k)*Sum[ Binomial[(n - k)*GCD[n, k, j]/GCD[n, k], k*GCD[n, k, j]/GCD[n, k]], {j, 1, GCD[n, k]}], {k, 1, Floor[n/2]}]; Table[a[n] - Fibonacci[n - 1], {n, 1, 50}] (* G. C. Greubel, Mar 12 2017 *) CROSSREFS Cf. A113166, A000045. Sequence in context: A065453 A152770 A098601 * A108572 A322335 A245907 Adjacent sequences:  A113483 A113484 A113485 * A113487 A113488 A113489 KEYWORD nonn AUTHOR Creighton Dement, Jan 09 2006; corrected Jun 20 2006 EXTENSIONS More terms from R. J. Mathar, Feb 08 2008 More terms from Max Alekseyev, Jun 06 2009 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified December 10 20:55 EST 2018. Contains 318049 sequences. (Running on oeis4.)