[go: up one dir, main page]

login
Revision History for A374590 (Bold, blue-underlined text is an addition; faded, red-underlined text is a deletion.)

Showing all changes.
Numbers whose maximum exponent in their prime factorization is an evil number (A001969).
(history; published version)
#10 by OEIS Server at Sun Jul 14 08:53:05 EDT 2024
LINKS

Amiram Eldar, <a href="/A374590/b374590_1.txt">Table of n, a(n) for n = 1..10000</a>

#9 by Michael De Vlieger at Sun Jul 14 08:53:05 EDT 2024
STATUS

reviewed

approved

Discussion
Sun Jul 14
08:53
OEIS Server: Installed first b-file as b374590.txt.
#8 by Joerg Arndt at Sun Jul 14 02:08:37 EDT 2024
STATUS

proposed

reviewed

#7 by Amiram Eldar at Sun Jul 14 00:31:04 EDT 2024
STATUS

editing

proposed

#6 by Amiram Eldar at Sun Jul 14 00:29:10 EDT 2024
NAME

Numbers whose maximal maximum exponent in their prime factorization is an evil number (A001969).

STATUS

proposed

editing

#5 by Amiram Eldar at Fri Jul 12 11:38:13 EDT 2024
STATUS

editing

proposed

#4 by Amiram Eldar at Fri Jul 12 11:35:54 EDT 2024
NAME

Number Numbers whose maximal exponent in their prime factorization is an evil number (A001969).

#3 by Amiram Eldar at Fri Jul 12 11:28:04 EDT 2024
LINKS

Amiram Eldar, <a href="/A374590/b374590_1.txt">Table of n, a(n) for n = 1..10000</a>

#2 by Amiram Eldar at Fri Jul 12 11:26:35 EDT 2024
NAME

allocated for Amiram EldarNumber whose maximal exponent in their prime factorization is an evil number (A001969).

DATA

8, 24, 27, 32, 40, 54, 56, 64, 72, 88, 96, 104, 108, 120, 125, 135, 136, 152, 160, 168, 184, 189, 192, 200, 216, 224, 232, 243, 248, 250, 264, 270, 280, 288, 296, 297, 312, 320, 328, 343, 344, 351, 352, 360, 375, 376, 378, 392, 408, 416, 424, 440, 448, 456, 459

OFFSET

1,1

COMMENTS

The asymptotic density of this sequence is Sum_{k in A001969} (1/zeta(k+1) - 1/zeta(k)) = 0.12101890210392912747... .

MATHEMATICA

evilQ[n_] := EvenQ[DigitCount[n, 2, 1]]; q[n_] := evilQ[Max[FactorInteger[n][[;; , 2]]]]; Select[Range[500], q]

PROG

(PARI) is(n) = n > 1 && !(hammingweight(vecmax(factor(n)[, 2])) % 2);

CROSSREFS

Cf. A001969, A051903.

Subsequence of A013929 and A262675 \ {1}.

Similar sequences: A368714, A369937, A369938, A369939, A374588, A374589.

KEYWORD

allocated

nonn,easy,base

AUTHOR

Amiram Eldar, Jul 12 2024

STATUS

approved

editing

#1 by Amiram Eldar at Fri Jul 12 11:20:15 EDT 2024
NAME

allocated for Amiram Eldar

KEYWORD

allocated

STATUS

approved