%I #6 Jun 23 2015 11:22:20
%S 11,14,19,41,89,91,94,111,114,118,119,141,149,181,191,194,199,411,418,
%T 419,449,481,489,491,494,498,499,811,814,818,849,881,889,894,898,899,
%U 911,914,919,941,949,989,991,994,998,1111,1114,1118,1119,1141,1149
%N Squarefree numbers with square nonzero square digits.
%t Select[Flatten[Table[FromDigits/@Tuples[{1,4,8,9},n],{n,2,4}]],SquareFreeQ] (* _Harvey P. Dale_, Oct 10 2013 *)
%Y Cf. A077674.
%K base,nonn
%O 1,1
%A _Amarnath Murthy_, Nov 16 2002
%E Corrected and extended by _David Garber_, Nov 19 2002