|
%I #7 Apr 29 2014 22:49:29
%S 1023469,1023479,1023547,1023574,1023586,1023647,1023649,1023657,
%T 1023689,1023745,1023746,1023749,1023794,1023847,1023879,1023965,
%U 1023985,1024367,1024369,1024537,1024538,1024563,1024567,1024583,1024637,1024679,1024687,1024735
%N Semiprimes which have one or more occurrences of exactly seven different digits.
%o (PARI)
%o list(lim)=my(v=List(), t); forprime(p=2, sqrt(lim), t=p; forprime(q=p, lim\t, listput(v, t*q))); vecsort(Vec(v)) \\ From A001358
%o b=list(1030000); s=[]; for(n=1, #b, if(#vecsort(eval(Vec(Str(b[n]))),,8)==7, s=concat(s, b[n]))); s
%Y Cf. A235690-A235694, A235696.
%Y Cf. A235154-A235161.
%K nonn,base
%O 1,1
%A _Colin Barker_, Jan 14 2014
|
