Logo

Greetings from The On-Line Encyclopedia of Integer Sequences!

Hints

Search: id:A136338
Displaying 1-1 of 1 results found. page 1
     Format: long | short | internal | text      Sort: relevance | references | number      Highlight: on | off
A136338 Primes in the array A136431 which are not Fibonacci numbers. +0
1
7, 11, 29, 37, 41, 67, 79, 97, 137, 191, 211, 277, 379, 631, 709, 821, 947, 967, 991, 1129, 1327, 1597, 1831, 2017, 2081, 2267, 2347, 2557, 2683, 2851, 2927, 3571, 3917, 4561, 4657, 4951, 5051, 5779, 6217, 6329, 6763, 8273, 8647, 8779, 9181, 9871, 10093 (list; graph; listen)
OFFSET

1,1

COMMENT

A generalization of prime Fibonacci numbers (A005478) are the prime hyperfibonacci numbers (primes in A136431). Referring to the array A(k,n) = Apply partial sum operator k times to Fibonacci numbers, we see that every prime occurs in the n=2 column (as it contains every positive integer).

So excluding n=2 and k=0 (A005478) we have the nontrivially prime hyperfibonacci numbers which are not Fibonacci numbers.

Note that this sequence does not indicate multiplicity (i.e. 7 occurs twice in the valid part of the table).

Continuing the table of primes in the examples, from a computation by Joshua Zucker we have:

k=1: {7, ...} no more through n = 1000.

k=2: {7, 79, 514201, 14930317, 956722025983, 5527939700884681 4660046610375530219, ...}

k=3: {11, 97, 17519, next value has 60 digits, ...}

k=4: {41, 10093, 16703, 3520457, 591286703533, 6557470285501, 19740274219868101499, ...}

k=5: {709, 8273, 14323, 466004661037329684,1 298611126818977061133263, ...}

k=6: {29, 2683, 23945893, 1835540197, 4052735290427, 27777884012083, ...}

k=7: {37, 967, 2267, 127921, 226007, 62048869, 1131463777, 7540113804271826929, ...}

k=8: {27777538280521, 1409869790947669143312035590804646728957, ...}

k=9: {1033628323428189498226451492123369099, next value has 60 digits, ...}

k=10: {67, 5972304273877744135569337875802249660927, ...}

k=11: {79, 4478413, 19008291293, 61305228407581679, ...}

k=12: {6763, 1982269, 37886753582095837, 2791715456569622316696636389, ...}.

FORMULA

Primes in the hyperfibonacci number array of A136431, excluding the n=2 column (which contains every positive integer)

EXAMPLE

k=1: primes in A000071 = {A000071(4) = 7}, no more through n = 1000.

k=2: primes in A001924 = {A001924(3) = 7, A001924(7) = 79, A001924(25) = 514201, ...}

k=3: primes in A014162 = {A014162(3) = 11, A014162(6) = 97, A014162(16) = 17519}, no more through n = 30.

k=4: primes in A014166 = {A014166(4) = 41, A014166(13) = 10093, A014166(14) = 16703}

k=5: primes in A053739 = {A053739(7) = 709, A053739(10) = 8273, A053739(11) = 14323}, no more through n = 27.

k=6: primes in A053295 = {A053295(3) = 29, A053295(8) = 2683, 23945893(24) = 23945893}, no more through n = 27.

k=7: primes in A053296 = {A053296(3) = 37, A053296(6) = 967, A053296(7) = 2267, A053296(12) = 127921, A053296(13) = 226007}, no more through n = 27.

MAPLE

A136431 := proc(k, n) local x ; coeftayl(x/(1-x-x^2)/(1-x)^k, x=0, n) ; end: A136338 := proc(amax) local a, k, n, a136431; a := [] ; for k from 1 do if A136431(k, 3) > amax then break ; fi ; for n from 3 do a136431 := A136431(k, n) ; if a136431 > amax then break ; fi ; if isprime(a136431) and not a136431 in a then a := [op(a), a136431] ; fi ; od: od: sort(a) ; end: A136338(20000) ; - R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Apr 21 2008

PROGRAM

(PARI code from M. F. Hasler) partsumfib(N, s=[], P=[])={ for( n=1+#s, N, s=concat(s, n+1); forstep( i=n, 1, -1, isprime( s[i]+= if( i>1, s[i-1], fibonacci(n+2) ) ) & P=setunion(P, [s[i]]) ); print(s); ); vecsort(eval(P))}

CROSSREFS

Cf. A000040, A005478, A136431, A137176.

Cf. A136431.

Adjacent sequences: A136335 A136336 A136337 this_sequence A136339 A136340 A136341

Sequence in context: A136020 A076304 A122560 this_sequence A110572 A023254 A129807

KEYWORD

easy,nonn

AUTHOR

Jonathan Vos Post (jvospost3(AT)gmail.com), Apr 12 2008

EXTENSIONS

Revised definition from njas, May 09 2008

More terms from R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Apr 21 2008

page 1

Search completed in 0.003 seconds

Lookup | Welcome | Find friends | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Transforms | Puzzles | Hot | Classics
More pages | Superseeker | Maintained by N. J. A. Sloane (njas@research.att.com)

Last modified January 7 17:35 EST 2009. Contains 152824 sequences.


AT&T Labs Research