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 A182811 #29 Apr 03 2023 10:36:12 %S A182811 64079,1860498,4870847,688846502588399 %N A182811 Cyclops-Lucas numbers. %C A182811 a(4) = 688846502588399 is the only known Cyclops-Lucas prime. %C A182811 It seems likely that these four are the only terms. There are no further terms below Lucas(10^7), and that number in decimal contains 208435 zeros (with ~208988 expected assuming normality), whereas a member of this sequence must have only 1. - _D. S. McNeil_, Dec 21 2010 %C A182811 This sequence is similar to A182809 in the sense that both have four positive terms and the only known prime is also the largest known term. - _Omar E. Pol_, Dec 21 2010 %C A182811 Indices in A000032 are 23, 30, 32, 71. - _Michel Marcus_ and _Omar E. Pol_, Feb 18 2018 %H A182811 G. L. Honaker, Jr. and Chris K. Caldwell, <a href="https://t5k.org/curios/page.php?number_id=10791">Prime Curios! 688846502588399</a> %F A182811 Intersection of A000032 and A134808. %e A182811 a(1) = 64079 is in the sequence because 64079 is a Lucas number and it is also a cyclops number. %t A182811 (* First run the program given for A134808 *) Select[LucasL[Range[10^3]], cyclopsQ] (* _Alonso del Arte_, Dec 20 2010 *) %t A182811 Select[LucasL[Range[500]],OddQ[IntegerLength[#]]&&DigitCount[#,10,0]==1&&IntegerDigits[#][[(IntegerLength[#]+1)/2]]==0&] (* _Harvey P. Dale_, Jul 01 2017 *) %Y A182811 Intersection of A000032 and A134808. %Y A182811 Cf. A005479, A134809, A182809. %K A182811 nonn,base,hard,more %O A182811 1,1 %A A182811 _Omar E. Pol_, Dec 20 2010