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 A297623 #15 Sep 08 2022 08:46:20 %S A297623 6,9,18,33,51,54,57,189,6948,28617,162864,173682,216870,496533 %N A297623 Numbers k such that Lucas(k) - prime(k) is a prime. %C A297623 a(15) > 5*10^5. - _Robert Price_, Feb 17 2018 %e A297623 a(1) = 6 because Lucas(6)=18, prime(6)=13 and 18-13=5 is a prime. %t A297623 Select[Range[10000], PrimeQ[LucasL[#] - Prime[#]]&] %o A297623 (Magma) [n: n in [1..5000] | IsPrime(Lucas(n)-NthPrime(n))]; %Y A297623 Cf. A000032, A000040, A050180, A288794. %K A297623 nonn,more %O A297623 1,1 %A A297623 _Vincenzo Librandi_, Jan 06 2018 %E A297623 a(11)-a(14) from _Robert Price_, Feb 17 2018