A077675 Squarefree numbers with square nonzero square digits.

11, 14, 19, 41, 89, 91, 94, 111, 114, 118, 119, 141, 149, 181, 191, 194, 199, 411, 418, 419, 449, 481, 489, 491, 494, 498, 499, 811, 814, 818, 849, 881, 889, 894, 898, 899, 911, 914, 919, 941, 949, 989, 991, 994, 998, 1111, 1114, 1118, 1119, 1141, 1149

Offset: 1

Author

Amarnath Murthy, Nov 16 2002

Keywords

• base
• nonn

Crossrefs

Cf. A077674.

Programs

Mathematica

Select[Flatten[Table[FromDigits/@Tuples[{1,4,8,9},n],{n,2,4}]],SquareFreeQ] (* Harvey P. Dale, Oct 10 2013 *)

Extensions

Corrected and extended by David Garber, Nov 19 2002