The OEIS is supported by the many generous donors to the OEIS Foundation.
%I #18 Feb 19 2024 01:55:50
%S 2,5,6,7,9,19,25,32,34,36,41,54,55,56,59,62,64,67,69,70,71,75,80,81,
%T 82,84,86,87,89,92,93,95,96,111,115,125,128,140,163,166,177,178,189,
%U 192,205,212,219,221,226,233,236,242,258,259,267,294,303,309,323,327,329
%N Numbers k such that k is a substring of 5^k.
%t ss5nQ[n_]:=Module[{len=IntegerLength[n]},MemberQ[Partition[ IntegerDigits[ 5^n], len,1],IntegerDigits[n]]]; Select[Range[400],ss5nQ] (* _Harvey P. Dale_, Jan 06 2013 *)
%Y Cf. A000351, A032740, A049301-A049307.
%K nonn,base,easy
%O 1,1
%A _David W. Wilson_