%I #14 Mar 11 2024 01:43:54

%S 1,5,25,29,41,42,43,48,49,53,61,65,69,70,85,89,97,99,101,125,139,145,

%T 149,167,189,194,213,227,231,245,265,269,273,339,340,348,365,368,369,

%U 385,423,458,464,485,487,489,492,500

%N Numbers k such that, treated as a string, k is a substring of Fibonacci(k).

%H Paolo P. Lava, <a href="/A068574/b068574.txt">Table of n, a(n) for n = 1..382</a>

%e Treated as strings, 69 is a substring of 117669030460994 = Fibonacci(69), so 69 belongs to the sequence.

%t Select[Range[500], StringPosition[ToString[Fibonacci[ # ]], ToString[ # ]] != {} &]

%K base,nonn

%O 1,2

%A _Joseph L. Pe_, Mar 26 2002