Thursday, May 9, 2024

A365589 Contribution to the OEIS

 

A365589Numbers that have at least one prime digit and at least one nonprime digit.2
12, 13, 15, 17, 20, 21, 24, 26, 28, 29, 30, 31, 34, 36, 38, 39, 42, 43, 45, 47, 50, 51, 54, 56, 58, 59, 62, 63, 65, 67, 70, 71, 74, 76, 78, 79, 82, 83, 85, 87, 92, 93, 95, 97, 102, 103, 105, 107, 112, 113, 115, 117, 120, 121, 122, 123, 124, 125, 126, 127, 128, 129, 130, 131, 132 (listgraphrefslistenhistoryedittextinternal format)
OFFSET
1,1
COMMENTS
The first 44 terms coincide with A085556 (Number of prime digits = number of nonprime digits). a(45) = 102; A085556(45) = 1022.
LINKS
MATHEMATICA
Select[Range[132], ContainsAny[IntegerDigits[#], {2, 3, 5, 7}] && ContainsAny[IntegerDigits[#], {0, 1, 4, 6, 8, 9}]&] (* James C. McMahon, Oct 08 2023 *)
CROSSREFS
Cf. A085556, A118950, A365472 (complement).
Sequence in context: A096514 A074163 A076979 * A085520 A085556 A175225
KEYWORD
nonn,base
AUTHOR
James C. McMahon, Sep 10 2023
STATUS
approved

No comments:

Post a Comment

MAGNIFICA HUMANITAS - Encyclical Letter of Pope Leo XIV

Pope Leo XIV (Image by: Edgar Beltrán, The Pillar  Deed - Attribution-ShareAlike 4.0 International - Creative Commons  ) On May 25, 2026, Po...

Popular in last 30 days