A163855 -id:A163855 - cp's OEIS frontend

A163853 Primes 4 less than some Fibonacci number.

17, 229, 373, 983, 4177, 6761, 17707, 4052739537877, 190392490709131, 19740274219868223163, 354224848179261915071, 11825896447871834976429068423, 3807901929474025356630904134047

Offset: 1

Vladimir Joseph Stephan Orlovsky, Aug 05 2009

nonn

Primes of the form A000045(i)-4, generated by i= 8, 13, 14, 16, 19, 20, 22,...

representing prime(j) at j= 4, 7, 50, 74, 166, 574, 870, 2033,...

Harvey P. Dale, Table of n, a(n) for n = 1..23

Cf. A000045, A005478, A163851, A163852, A163854, A163855

Clear[lst,a,f,n,p]; a=4;lst={};Do[f=Fibonacci[n];If[PrimeQ[p=f-a]&&p> 1,AppendTo[lst,p]],{n,3*6!}];lst
Select[Fibonacci[Range[4,300]]-4,PrimeQ] (* Harvey P. Dale, Jul 12 2025 *)

Some indices to Fibonacci and prime sequences added by R. J. Mathar, Sep 17 2009

A163856 Primes of the form Fibonacci(k)-10.

Original entry on oeis.org

3, 11, 79, 223, 367, 977, 514219, 24157807, 53316291163, 420196140727489663, 573147844013817084091, 48558529144435440119720805669229197631, 538522340430300790495419781092981030523

Offset: 1

Vladimir Joseph Stephan Orlovsky, Aug 05 2009

nonn

Generated by k= 7, 8, 11, 13, 14, 16, 29, 37, 53, 86, 101, 182, 187, 221,...

Cf. A000045, A163851, A163852, A163853, A163854, A163855

Clear[lst,a,f,n,p]; a=10;lst={};Do[f=Fibonacci[n];If[PrimeQ[p=f-a]&&p> 1,AppendTo[lst,p]],{n,3*6!}];lst
Select[Fibonacci[Range[7,200]]-10,PrimeQ] (* Harvey P. Dale, Feb 17 2020 *)

{A000045(k) : A000045(k)-10 in A000040}.

Definition rephrased by R. J. Mathar, Aug 12 2009

cp's OEIS Frontend

A163853 Primes 4 less than some Fibonacci number.

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

Mathematica

Extensions