A363534 Records in A363533.

1, 3, 9, 18, 48, 60, 540, 1998, 2844, 3045, 39753

Offset: 1

Author

Pontus von Brömssen, Jun 09 2023

Keywords

• nonn
• more

Crossrefs

Cf. A361997, A363533, A363535.

Programs

Mathematica

Union@ FoldList[Max, Array[(k = 1; While[! PrimeQ[# Fibonacci[k] + 1], k++]; k) &, 3000]] (* Michael De Vlieger, Jun 10 2023 *)