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

109, 230, 557, 675, 1094, 1679, 2070, 2314, 2594, 2781, 2873, 3133, 3498, 3548, 3595, 3601, 3629, 3911, 4059, 4171, 4264, 4274, 4501, 4568, 4878, 4889, 5112, 5136, 5507, 5675, 5907, 6059, 6152, 6260, 6490, 6667, 6669, 6938, 6961, 7667, 8013, 8640, 8729, 9171

Offset

1,1

Comments

Numbers m such that A278478(m) = 7.

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

Links

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

Formula

A000041(a(n)) = A278201(n).

Mathematica

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

Prog

(PARI) isok(n) = valuation(numbpart(n), 2)==7;
select(n->isok(n), vector(9000, n, n))

Crossrefs

Cf. A000041, A278201, A278779, A278780, A278781, A278782, A278783.

Positions of 7's in A278478.

Sequence in context: A142777 A142797 A140622 * A256380 A063342 A260010

Adjacent sequences: A278781 A278782 A278783 * A278785 A278786 A278787

Keyword

nonn

Author

Colin Barker, Nov 28 2016

Status

approved