login
Squarefree numbers with every digit a squarefree number.
1

%I #10 Oct 30 2022 18:19:59

%S 1,2,3,5,6,7,11,13,15,17,21,22,23,26,31,33,35,37,51,53,55,57,61,62,65,

%T 66,67,71,73,77,111,113,115,122,123,127,131,133,137,151,155,157,161,

%U 163,165,166,167,173,177,211,213,215,217,221,222,223,226,227,231,233

%N Squarefree numbers with every digit a squarefree number.

%H Vincenzo Librandi, <a href="/A062101/b062101.txt">Table of n, a(n) for n = 1..5000</a>

%e a(9) = 15 is a squarefree number, 1 and 5 are also squarefree numbers.

%t With[{sf={1,2,3,5,6,7}},Flatten[Table[Select[FromDigits/@ Tuples[ sf,n], SquareFreeQ],{n,3}]]] (* _Harvey P. Dale_, Aug 09 2014 *)

%K nonn,base,easy

%O 1,2

%A _Amarnath Murthy_, Jun 16 2001

%E More terms from _Reiner Martin_, Jul 20 2001