|
|
A232745
|
|
Numbers k for which the largest m such that m! divides k is even.
|
|
11
|
|
|
2, 4, 8, 10, 14, 16, 20, 22, 24, 26, 28, 32, 34, 38, 40, 44, 46, 48, 50, 52, 56, 58, 62, 64, 68, 70, 72, 74, 76, 80, 82, 86, 88, 92, 94, 96, 98, 100, 104, 106, 110, 112, 116, 118, 122, 124, 128, 130, 134, 136, 140, 142, 144, 146, 148, 152, 154, 158, 160, 164
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
Numbers k for which A055881(k) is even.
Equally: Numbers k which have an odd number of the trailing zeros in their factorial base representation A007623(k).
The sequence can be described in the following manner: Sequence includes all multiples of 2! (even numbers), except that it excludes from those the multiples of 3! (6), except that it includes the multiples of 4! (24), except that it excludes the multiples of 5! (120), except that it includes the multiples of 6! (720), except that it excludes the multiples of 7! (5040), except that it includes the multiples of 8! (40320), except that it excludes the multiples of 9! (362880), except that it includes the multiples of 10! (3628800), except that ..., ad infinitum.
The number of terms not exceeding m! for m>=1 is A000166(m). The asymptotic density of this sequence is 1/e (A068985). - Amiram Eldar, Feb 26 2021
|
|
LINKS
|
|
|
MATHEMATICA
|
seq[max_] := Select[Range[max!], OddQ @ LengthWhile[Reverse @ IntegerDigits[#, MixedRadix[Range[max, 2, -1]]], #1 == 0 &] &]; seq[5] (* Amiram Eldar, Feb 26 2021 *)
|
|
PROG
|
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|