cp's OEIS Frontend

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.

Showing 1-6 of 6 results.

A111035 Numbers n that divide the sum of the first n nonzero Fibonacci numbers.

Original entry on oeis.org

1, 2, 24, 48, 72, 77, 96, 120, 144, 192, 216, 240, 288, 319, 323, 336, 360, 384, 432, 480, 576, 600, 648, 672, 720, 768, 864, 960, 1008, 1080, 1104, 1152, 1200, 1224, 1296, 1320, 1344, 1368, 1440, 1517, 1536, 1680, 1728, 1800, 1920, 1944, 2016, 2064, 2160
Offset: 1

Views

Author

Joseph L. Pe, Oct 05 2005

Keywords

Comments

The sum of the first n nonzero Fibonacci numbers is F(n+2)-1, sequence A000071. Knott discusses the factorization of these numbers. Most of the terms are divisible by 24. - T. D. Noe, Oct 10 2005, edited by M. F. Hasler, Mar 01 2020
All terms are either multiples of 24 (cf. A124455) or odd (cf. A331976) or congruent to 2 (mod 12), cf. A331870 where this statement is proved. - M. F. Hasler, Mar 01 2020

Examples

			2 | 4, 24 | 121392, 48 | 12586269024, ... [Corrected by _M. F. Hasler_, Feb 06 2020]
		

Crossrefs

See A101907 for another version.
Cf. A111058 (the analog for Lucas numbers).
Cf. A124455 (k for a(n) = 24k), A124456 (other a(n)), A331976 (odd a(n)), A331870 (even a(n) != 24k).

Programs

  • GAP
    Filtered([1..3000], n-> ((Fibonacci(n+2)-1) mod n)=0 ); # G. C. Greubel, Feb 03 2020
  • Magma
    [1] cat [n: n in [1..3000] | Fibonacci(n+2) mod n eq 1 ]; // G. C. Greubel, Feb 03 2020
    
  • Maple
    select(n-> irem(combinat[fibonacci](n+2)-1, n)=0, [$1..3000])[]; # G. C. Greubel, Feb 03 2020
  • Mathematica
    Select[Range[3000], Mod[Fibonacci[ #+2]-1, # ]==0&] (*  T. D. Noe, Oct 06 2005 *)
  • PARI
    is(n)=((Mod([1,1;1,0],n))^(n+2))[1,2]==1 \\ Charles R Greathouse IV, Feb 04 2013
    
  • Sage
    [n for n in (1..3000) if mod(fibonacci(n+2), n)==1 ] # G. C. Greubel, Feb 03 2020
    

Formula

{n: n| A000071(n+2)}. - R. J. Mathar, Feb 05 2020

Extensions

More terms from Rick L. Shepherd and T. D. Noe, Oct 06 2005

A331976 Odd integers m that divide the sum of the first m nonzero Fibonacci numbers.

Original entry on oeis.org

1, 77, 319, 323, 1517, 3021, 4757, 6479, 7221, 8159, 8229, 9797, 11663, 12597, 13629, 13869, 14429, 14949, 16637, 18407, 19043, 19437, 23407, 24947, 25437, 30049, 30621, 34943, 34989, 35207, 39203, 43677, 44099, 47519, 51983, 53663, 55221, 65471, 70221, 77837, 78089, 79547
Offset: 1

Views

Author

Michel Marcus, Feb 03 2020

Keywords

Comments

Not all terms are squarefree, for instance 13869, 14949, 43677, 93357, ... are not.
A subsequence of A124456, missing just the even terms A124456({2, 155, 397, 469, ...}) = {2, 758624, 7057466, 10805846, ...}. - M. F. Hasler, Feb 06 2020
There are infinitely many terms. - Oisín Flynn-Connolly, May 01 2025

Crossrefs

Odd terms in A111035, A124456.

Programs

Formula

Equals A124456 without even terms. - M. F. Hasler, Feb 06 2020

A331870 Even numbers n which divide the sum of the Fibonacci numbers F(1) + ... + F(n) but are not a multiple of 24.

Original entry on oeis.org

2, 758642, 7057466, 10805846, 50860946, 59677526, 61800878, 155045678, 178551374, 217281146, 343943882, 359455694, 432175586, 609069506, 1449599486, 1721358698, 1829675354, 1884592706, 2013264194, 2116706282, 2680549946, 2971193186, 3084402122, 3252387386, 3454785386
Offset: 1

Views

Author

M. F. Hasler, Feb 29 2020

Keywords

Comments

A111035 lists numbers n which divide the sum of the first n nonzero Fibonacci numbers. Most of these are multiples of 24. Sequence A124456 lists those which aren't. Most of these are odd (cf. A331976), this sequence lists the exceptions.
a(2) was found by Don Reble, cf. A124456.
If we consider F(n+2) = 1 + the sum of the first n nonzero Fibonacci numbers (cf. A000071), then for even n we find:
4 divides F(n+2) for n == 4 (mod 12), 3 divides F(n+2) for n == 6 (mod 12),
F(n+2) == 3 (mod 4) for n == 8 (mod 12), 2 divides F(n+2) for n == 10 (mod 12),
F(n+2) == 5 (mod 6) for n == 12 (mod 24).
These relations imply that all terms a(n) == 2 (mod 12) for all n. This also means that all terms of A111035 are either divisible by 24, or odd, or congruent to 2 (mod 12).

Crossrefs

Cf. A124456, A331976, A111035, A000045 (Fibonacci numbers), A000071 (F(n)-1 = F(0)+...+F(n-2)).

Programs

  • PARI
    M=[1,1;1,0]; forstep(n=2,oo,12,n%24&&(Mod(M,n)^(n+1))[1,1]==1&& print1(n",")) \\ Custom implementation of is_A111035(), check for updates there.

Formula

a(n) == 2 (mod 12) for all n.

Extensions

Terms a(15) and beyond from Giovanni Resta, Mar 02 2020

A124455 Numbers n such that 24n divides the sum of the first 24n nonzero Fibonacci numbers.

Original entry on oeis.org

1, 2, 3, 4, 5, 6, 8, 9, 10, 12, 14, 15, 16, 18, 20, 24, 25, 27, 28, 30, 32, 36, 40, 42, 45, 46, 48, 50, 51, 54, 55, 56, 57, 60, 64, 70, 72, 75, 80, 81, 84, 86, 90, 92, 96, 98, 100, 102, 108, 110, 112, 114, 120, 125, 126, 128, 135, 138, 140, 144, 150, 153, 155, 160, 162
Offset: 1

Views

Author

Alexander Adamchuk, Nov 02 2006

Keywords

Comments

Numbers n such that n divides the sum of the first n nonzero Fibonacci numbers are listed in A111035 = {1, 2, 24, 48, 72, 77, 96, 120, 144, 192, 216, 240, 288, 319, 323, 336, 360, ...}. Most of these are multiples of 24. Those which are not a multiple of 24 are listed in A124456 = {1, 2, 77, 319, 323, 1517, 3021, 4757, 6479, 7221, 8159, 8229, 9797, ...}.
This sequence coincides with A072378 (12n | F(12n)) for all values up to 84. The first two different terms are 86 and 164.
Prime a(n) are {2, 3, 5, 281, ...}.

Crossrefs

Cf. A111035, A124456, A072378 (numbers n such that 12n divides Fibonacci(12n)), A000045 (Fibonacci numbers).

Programs

  • Mathematica
    Select[Range[10000], IntegerQ[ #/24]&&Mod[Fibonacci[ #+2]-1, # ]==0&] /24

Extensions

Edited by M. F. Hasler, Feb 04 2020

A254141 The average of a(n) consecutive Fibonacci numbers is never an integer.

Original entry on oeis.org

8, 16, 21, 28, 32, 40, 52, 55, 56, 64, 65, 68, 69, 80, 84, 85, 87, 88, 92, 93, 99, 104, 105, 112, 117, 119, 128, 132, 133, 136, 140, 141, 145, 148, 152, 153, 155, 156, 160, 161, 164, 165, 171, 172, 176, 184, 187, 188, 196, 200, 203, 204, 205, 207, 208, 209, 212
Offset: 1

Views

Author

Paolo P. Lava, Jan 26 2015

Keywords

Comments

Subset of A033949 and A175594 (essentially the same sequence).
Numbers of the form 2^k, with k>=3, appear to be part of the sequence.
The file "List of indexes and steps (k, x, y)" (see Links) for k = 1, 2, 3, 4, ... consecutive Fibonacci numbers gives the minimum index to start to calculate the average ( x ) and the step to add to get all the other averages ( y ).
E.g.: for k = 7 we have 7, 6, 8. This means that we must start from the 6th Fibonacci number to add 7 consecutive Fibonacci numbers and get an average that is an integer. Fibonacci(6) + Fibonacci(7) + ... + Fibonacci(12) = 8 + 13 + 21 + 34 + 55 + 89 + 144 = 364 and 364 / 7 = 52.
Then 6 + 1*8 = 14, 6 + 2*8 = 22, 6 + 3*8 = 30, etc. are the other indexes:
Fibonacci(14) + Fibonacci (15) + ... + Fibonacci(20) = 377 + 610 + 987 + 1597 + 2584 + 4181 + 6765 = 17101 and 17101 / 7 = 2443;
Fibonacci(22) + Fibonacci(23) + ... + Fibonacci(28) = 17711 + 28657 + 46368 + 75025 + 121393 + 196418 + 317811 = 803383 and 803383 / 7 = 114769;
Fibonacci(30) + Fibonacci(31) + ... + Fibonacci(36) = 832040 + 1346269 + 2178309 + 3524578 + 5702887 + 9227465 + 14930352 = 37741900 and 37741900 / 7 = 5391700; etc.
In particular we note that:
x = 0 is A219612; x = 1 is A124456; x = 0 and y = k - 1 is A106535;
y = 1 is A141767; x = k - 1 and y = k + 1 is A000057;
x = y - 1 or y|k is A023172; y = k is A000351;
x = y - k + 1 appears to give only prime numbers: 3,11,19,31,59,71,79,131,179,191,239,251,271,311,359,379,419,431,439,479,491,499,571,599,631,659,719,739,751,839,971, etc.

Crossrefs

Programs

  • Maple
    with(numtheory); with(combinat):P:=proc(q) local a,b,k,j,n,ok;
    for j from 1 to q do b:=0; ok:=1;
    for n from 0 to q do a:=add(fibonacci(n+k),k=0..j-1)/j;
    if type(a,integer) then ok:=0; break; fi; od;
    if ok=1 then print(j); fi; od; end: P(20000);

A383021 Self-summable Fibonacci numbers: integers k such that Fibonacci(k) divides the sum of the first Fibonacci(k) nonzero Fibonacci numbers.

Original entry on oeis.org

1, 2, 3, 12, 24, 34, 36, 46, 48, 60, 68, 72, 92, 94, 96, 106, 108, 120, 144, 166, 168, 180, 188, 192, 212, 214, 216, 226, 240, 274, 288, 300, 324, 332, 334, 336, 346, 360, 384, 394, 428, 432, 452, 454, 466, 480, 504, 514, 526, 540, 548, 552, 576, 586, 600, 612
Offset: 1

Views

Author

Oisín Flynn-Connolly, Apr 12 2025

Keywords

Comments

Same as integers k such that Fibonacci(k) divides Fibonacci(Fibonacci(k)+2)-1.
Contains infinitely many terms.
Contains all 2p and 4p such that p is prime and p = 2,8 mod 15.
Fibonacci(k) is a subsequence of A124456.

Crossrefs

Extensions

More terms from Alois P. Heinz, Apr 14 2025
Showing 1-6 of 6 results.