login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A111697 5-almost primes with semiprime digits (digits 4, 6, 9 only). 9
464, 496, 696, 944, 4446, 4496, 4664, 6444, 6669, 6996, 9666, 9944, 44649, 44664, 44694, 44696, 44946, 44964, 46664, 46696, 49446, 49496, 49944, 64664, 66664, 66996, 69464, 69944, 69996, 94996, 96464, 96664, 96996, 99664, 99946, 99996 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

LINKS

Charles R Greathouse IV, Table of n, a(n) for n = 1..10000

EXAMPLE

a(1) = 464 = 2^4 x 29, a(2) = 496 = 2^4 * 31, a(3) = 696 = 2^3 * 3 * 29, a(4) = 944 = 2^4 * 59, a(5) = 4446 = 2 * 3^2 * 13 * 19, a(6) = 4496 = 2^4 * 281, a(7) = 4664 = 2^3 * 11 * 53, a(8) = 6444 = 2^2 * 3^2 * 179, a(9) = 6669 = 3^3 * 13 * 19, a(10) = 6996 = 2^2 * 3 * 11 * 53.

MATHEMATICA

Select[Range[100000], PrimeOmega[#]==5&&Union[Drop[Drop[Drop[ DigitCount[ #], {9}], {6}], {4}]]=={0}&] (* Harvey P. Dale, Oct 03 2011 *)

PROG

(PARI) do(N)=my(v=List(), a=[4, 6, 9]); for(d=1, N, forvec(u=vector(d, i, [1, 3]), t=fromdigits(apply(n->a[n], u)); if(bigomega(t)==5, listput(v, t)))); Set(v) \\ Charles R Greathouse IV, Feb 01 2017

CROSSREFS

Cf. A001358, A014614, A107665, A107666, A107342, A111494, A111496.

Sequence in context: A220716 A189830 A050424 * A116344 A260497 A254693

Adjacent sequences:  A111694 A111695 A111696 * A111698 A111699 A111700

KEYWORD

base,easy,nonn

AUTHOR

Jonathan Vos Post, Nov 17 2005

EXTENSIONS

Corrected by Ray Chandler, Nov 19 2005

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified July 10 00:25 EDT 2020. Contains 335570 sequences. (Running on oeis4.)