A278783 Numbers m such that A000041(m) is of the form 2^6 * k for odd k.

66, 149, 298, 435, 450, 518, 615, 703, 751, 764, 765, 855, 982, 1389, 1398, 1411, 1555, 1896, 2113, 2124, 2286, 2400, 2575, 2618, 2816, 2890, 2989, 3032, 3113, 3202, 3351, 3430, 3454, 3485, 3509, 3562, 3652, 3786, 3994, 4061, 4202, 4690, 5042, 5055, 5067

Offset

1,1

Comments

Also numbers m such that A000041(m) has six times as many even divisors as odd divisors.

Links

Colin Barker, Table of n, a(n) for n = 1..150

Formula

A000041(a(n))) = A278200(n).

Mathematica

Select[Range[5100], IntegerExponent[PartitionsP[#], 2] == 6 &] (* Amiram Eldar, May 25 2024 *)

Prog

(PARI) isok(n) = valuation(numbpart(n), 2)==6;
select(n->isok(n), vector(6000, n, n))

Crossrefs

Cf. A000041, A278200, A278779, A278780, A278781, A278782, A278784.

Positions of 6's in A278478.

Sequence in context: A044317 A044698 A122125 * A358102 A258966 A258959

Adjacent sequences: A278780 A278781 A278782 * A278784 A278785 A278786

Keyword

nonn

Author

Colin Barker, Nov 28 2016

Status

approved