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.
%I A363535 #10 Jun 19 2023 17:38:31 %S A363535 1,3,7,25,43,139,227,263,727,2463,3541 %N A363535 Indices of records in A363533. %C A363535 a(12) = 9043 unless A363533(9043) = -1. %t A363535 s = Array[(k = 1; While[! PrimeQ[# Fibonacci[k] + 1], k++]; k) &, 3000]; t = Union@ FoldList[Max, s]; Array[FirstPosition[s, t[[#]]][[1]] &, Length[t]] (* _Michael De Vlieger_, Jun 10 2023 *) %Y A363535 Cf. A361998, A363533, A363534. %K A363535 nonn,more %O A363535 1,2 %A A363535 _Pontus von Brömssen_, Jun 09 2023