%I #16 Aug 26 2023 19:48:54
%S 1,4,13,36,113,487,1036,3214,10456,36786,100963,319656,1001964,
%T 3165969,10001786,31626854,100013919,316256807,1000029656,3162322481,
%U 10000115537
%N a(n+1) is the smallest number > a(n) such that the digits of a(n)^2 are all (with multiplicity) properly contained in the digits of a(n+1)^2, with a(0)=1.
%C Probably infinite and at least O(10^(n/2)). - _David W. Wilson_
%e 13^2 = 169 and 36 is the next smallest number whose square (in this case 1296) properly contains the digits 1,6,9.
%o (Haskell)
%o import Data.List ((\\), sort)
%o a065297 n = a065297_list !! n
%o a065297_list = 1 : f 1 (drop 2 a000290_list) where
%o f x (q:qs) | null (xs \\ sq) && sort xs /= sort sq = y : f y qs
%o | otherwise = f x qs
%o where y = a000196 q; sq = show q; xs = show (x * x)
%o -- _Reinhard Zumkeller_, Nov 22 2012
%Y Cf. A050630, A050631, A048559, A050636, A065298, A014563, A066825.
%Y Cf. A000290, A000196.
%K base,nonn
%O 0,2
%A _Floor van Lamoen_, Oct 29 2001
%E More terms from _Marc Paulhus_, Jan 29, 2002
%E More terms from _David W. Wilson_ and _Marc Paulhus_, Feb 05 2002
%E a(19)-a(20) from _Sean A. Irvine_, Aug 26 2023