A029784 Squares such that digits of sqrt(n) are not present in n.
4, 9, 16, 49, 64, 81, 289, 324, 484, 576, 841, 1089, 1156, 1444, 1521, 1936, 2209, 2809, 2916, 3249, 3364, 3481, 3844, 4489, 5184, 5929, 6241, 7056, 7744, 8464, 8836, 20736, 24649, 24964, 29929, 34969, 35344, 36864, 37636, 43681, 44944, 50176, 56169, 56644
Offset: 1
Links
- Giovanni Resta, Table of n, a(n) for n = 1..10000
Programs
-
Mathematica
Select[Range[500], {} == Intersection @@ IntegerDigits[{#, #^2}] &]^2 (* Giovanni Resta, Aug 08 2018 *)
Formula
a(n) = A029783(n)^2. - Michel Marcus, Aug 08 2018
Extensions
More terms from Giovanni Resta, Aug 08 2018