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 A216554 #14 Apr 19 2020 16:31:41
%S A216554 2,4,11,17,19,41,113,313,353,617,1097,1361,4787,4793,5851,8467,10691,
%T A216554 12251,13963,14449,35449,36779,44507,51169,56003,89849,140057,148091,
%U A216554 159521,183089,193201,202667,387433,443609,574219,616787,692147
%N A216554 Numbers n such that the n-th Lucas number is prime and can be written in the form a^2 + 3*b^2.
%H A216554 Blair Kelly, <a href="http://mersennus.net/fibonacci">Factorizations of Fibonacci and Lucas numbers</a>
%t A216554 Select[Range[693000],PrimeQ[LucasL[#]]&&Length[Solve[{a^2+3b^2==LucasL[#],a>=0,b>=0},{a,b},Integers]]>0&] (* _Harvey P. Dale_, Apr 19 2020 *)
%Y A216554 Cf. A000032, A001606.
%K A216554 nonn
%O A216554 1,1
%A A216554 _V. Raman_, Sep 08 2012