A235696 Semiprimes which have one or more occurrences of exactly eight different digits.

10234569, 10234657, 10234685, 10234687, 10234769, 10234795, 10234859, 10234865, 10234879, 10234957, 10234967, 10235469, 10235479, 10235489, 10235497, 10235679, 10235689, 10235769, 10235789, 10235798, 10235846, 10235847, 10235879, 10235894, 10235947, 10235986

Offset

1,1

Links

Harvey P. Dale, Table of n, a(n) for n = 1..1000

Mathematica

Select[Range[10234000, 10236000], PrimeOmega[#]==Count[DigitCount[#], 0]==2&] (* Harvey P. Dale, Sep 01 2014 *)

Prog

(PARI)
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
b=list(1030000); s=[]; for(n=1, #b, if(#vecsort(eval(Vec(Str(b[n]))), , 8)==8, s=concat(s, b[n]))); s

Crossrefs

Cf. A235690-A235695.

Cf. A235154-A235161.

Sequence in context: A282873 A219743 A276510 * A074665 A235160 A109177

Adjacent sequences: A235693 A235694 A235695 * A235697 A235698 A235699

Keyword

nonn,base

Author

Colin Barker, Jan 14 2014

Status

approved