login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

Absolute composites: every permutation of digits (dropping any leading zeros) is a composite number.
7

%I #11 May 22 2017 14:20:33

%S 4,6,8,9,12,15,18,21,22,24,25,26,27,28,33,36,39,40,42,44,45,46,48,49,

%T 51,52,54,55,56,57,58,60,62,63,64,65,66,68,69,72,75,77,78,80,81,82,84,

%U 85,86,87,88,90,93,94,96,99,102,105,108,111,114,116,117,120,122,123

%N Absolute composites: every permutation of digits (dropping any leading zeros) is a composite number.

%H T. D. Noe, <a href="/A067012/b067012.txt">Table of n, a(n) for n = 1..10000</a>

%e 18 is a term since it is composite and the permutation 81 is composite too.

%t t={}; Do[l1=Table[FromDigits[k], {k,Permutations[IntegerDigits[n]]}]; If[Select[l1,PrimeQ] == {} && FreeQ[l1,1] == True, AppendTo[t,n]],{n,123}]; t (* _Jayanta Basu_, May 03 2013 *)

%Y Cf. A067013.

%K base,nonn

%O 1,1

%A _Lior Manor_, Dec 26 2001