OFFSET
1,1
COMMENTS
Crooked semiprimes. This is to A217048 as integers all of whose numerals are written (san serif) with at least one right or acute angle (A214584) are to numbers using only the curved digits 0, 3, 6, 8 and 9 (A072960). This is to crooked primes (A217039) as semiprimes (A001358) are to primes (A000040).
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..1000
EXAMPLE
4555 = 5 * 911 is semiprime.
MATHEMATICA
SemiPrimeQ[n_Integer] := If[Abs[n] < 2, False, (2 == Plus @@ Transpose[FactorInteger[Abs[n]]][[2]])]; Select[Flatten[Table[FromDigits /@ Tuples[{4, 5, 7}, n], {n, 5}]], SemiPrimeQ] (* T. D. Noe, Sep 27 2012 *)
Select[Flatten[Table[FromDigits/@Tuples[{4, 5, 7}, n], {n, 5}]], PrimeOmega[ #] == 2&] (* Harvey P. Dale, Sep 21 2016 *)
CROSSREFS
KEYWORD
nonn,base,easy
AUTHOR
Jonathan Vos Post, Sep 26 2012
EXTENSIONS
Corrected and extended by T. D. Noe, Sep 27 2012
STATUS
approved