A034905 Numbers whose square contains no loops in its digits (assumes 1, 2, 3, 5, 7 have no loops and 0, 4, 6, 8, 9 do).
1, 5, 11, 15, 35, 39, 61, 85, 111, 115, 165, 189, 235, 239, 335, 365, 389, 415, 461, 485, 611, 715, 1061, 1085, 1165, 1235, 1239, 1489, 1585, 1665, 1765, 1885, 2261, 2285, 2715, 3335, 3365, 3489, 3511, 3515, 3635, 3711, 3915, 3939, 3965, 4139, 4211, 4715
Offset: 1
Examples
13^2 = 169 contains a 6 and a 9, so 13 does not belong to the sequence.
Links
- Giovanni Resta, Table of n, a(n) for n = 1..10000
Programs
-
Mathematica
Select[Range[5000],ContainsAll[{1,2,3,5,7},IntegerDigits[#^2]]&] (* Giorgos Kalogeropoulos, Jul 30 2021 *)