A090208 Partial sums of sequence (A090206) of consecutive nonprime Fibonacci numbers.
1, 2, 9, 29, 55, 89, 199, 521, 987, 1597, 3571, 6765, 10946, 17711, 28657, 64079, 121393, 196418, 317811, 514229, 1149851, 2178309, 3524578, 5702887, 9227465, 14930352, 24157817, 39088169, 63245986, 102334155
Offset: 0
Programs
-
Mathematica
Total /@ Partition[ Select[Fibonacci /@ Range[0, 40], ! PrimeQ[#] &], 2, 1] (* Seth A. Troisi, May 14 2022 *)
Formula
F(0) = 0; F(1) = 1; F(n) = F(n-1) + F(n-2); F(0:9) = 0, 1, 1, 2, 3, 5, 8, 13, 21, 34 nonprimes: 0, 1, 1, 8, 21 sums of consecutive nonprimes: 1, 2, 9, 29
Extensions
a(29) corrected by Seth A. Troisi, May 13 2022