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 A288794 #24 Sep 08 2022 08:46:19 %S A288794 1,6,12,18,54,75,354,10158,23280,33726,38226,70749,244779,308604 %N A288794 Numbers k such that Lucas(k) + prime(k) is a prime. %C A288794 a(15) > 500000. %e A288794 a(1) = 1 because Lucas(1)=1, prime(1)=2 and 1+2=3 is a prime. %e A288794 a(2) = 6 because Lucas(6)=18, prime(6)=13 and 18+13=31 is a prime. %t A288794 Select[Range[1000], PrimeQ[LucasL[#] + Prime[#]] &] %o A288794 (Magma) [n: n in [1..950] | IsPrime(Lucas(n)+NthPrime(n))]; %Y A288794 Cf. A000032, A000040, A050180. %K A288794 nonn,more %O A288794 1,2 %A A288794 _Vincenzo Librandi_, Jun 16 2017 %E A288794 a(8)-a(12) from _Robert Price_, Oct 26 2017 %E A288794 a(13)-a(14) from _Robert Price_, Dec 16 2017