OFFSET
1,1
COMMENTS
LINKS
Eric Weisstein's World of Mathematics, Lucas Number
Eric Weisstein's World of Mathematics, Smarandache Sequences
EXAMPLE
MATHEMATICA
Select[Module[{nn=40, ll}, ll=LucasL[Range[nn]]; Table[FromDigits[Flatten[IntegerDigits/@Take[ll, n]]], {n, nn}]], PrimeQ] (* Harvey P. Dale, May 07 2023 *)
CROSSREFS
KEYWORD
nonn,base,bref
AUTHOR
Alexander Adamchuk, Oct 06 2007
EXTENSIONS
Edited by Charles R Greathouse IV, Apr 24 2010
STATUS
approved