OFFSET
1,1
COMMENTS
A130774 = {1, 13, 134, 1347, 134711, 13471118, 1347111829, 134711182947, 13471118294776, 13471118294776123, ...} = Concatenate Lucas numbers. Indices of prime terms in A130774 are {2, 10, 31, ...}.
a(4) > A130774(500) = 1.347...*10^26425, if it exists. - Amiram Eldar, Jul 17 2025
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,hard
AUTHOR
Alexander Adamchuk, Oct 06 2007
EXTENSIONS
Edited by Charles R Greathouse IV, Apr 24 2010
STATUS
approved
