A029784 - OEIS

%I #11 Aug 08 2018 18:47:14

%S 4,9,16,49,64,81,289,324,484,576,841,1089,1156,1444,1521,1936,2209,

%T 2809,2916,3249,3364,3481,3844,4489,5184,5929,6241,7056,7744,8464,

%U 8836,20736,24649,24964,29929,34969,35344,36864,37636,43681,44944,50176,56169,56644

%N Squares such that digits of sqrt(n) are not present in n.

%H Giovanni Resta, <a href="/A029784/b029784.txt">Table of n, a(n) for n = 1..10000</a>

%F a(n) = A029783(n)^2. - _Michel Marcus_, Aug 08 2018

%t Select[Range[500], {} == Intersection @@ IntegerDigits[{#, #^2}] &]^2 (* _Giovanni Resta_, Aug 08 2018 *)

%Y Cf. A029783, A029785, A029786, A111116, A113316.

%K nonn,base

%O 1,1

%A _Patrick De Geest_

%E More terms from _Giovanni Resta_, Aug 08 2018