A137485 Numbers with 22 divisors.

3072, 5120, 7168, 11264, 13312, 17408, 19456, 23552, 29696, 31744, 37888, 41984, 44032, 48128, 54272, 60416, 62464, 68608, 72704, 74752, 80896, 84992, 91136, 99328, 103424, 105472, 109568, 111616, 115712, 118098, 130048, 134144, 140288

Offset

1,1

Comments

Maple implementation: see A030513.

Numbers of the form p^21 or p*q^10, where p and q are distinct primes. - R. J. Mathar, Mar 01 2010

Links

T. D. Noe, Table of n, a(n) for n = 1..1000

Formula

A000005(a(n))=22.

Maple

A137485=proc(q) local n;
for n from 1 to q do if tau(n)=22 then print(n); fi; od; end:
A137485(10^10);

Mathematica

Select[Range[200000], DivisorSigma[0, #]==22&] (* Vladimir Joseph Stephan Orlovsky, May 05 2011 *)

Prog

(PARI) is(n)=numdiv(n)==22 \\ Charles R Greathouse IV, Jun 19 2016

Crossrefs

Cf. A030513-A030516, A030626, A030627, A030634-A030638, A005179, A003680, A096932, A061286, A061283.

Sequence in context: A224970 A224116 A183726 * A251786 A334256 A262459

Adjacent sequences: A137482 A137483 A137484 * A137486 A137487 A137488

Keyword

nonn

Author

R. J. Mathar, Apr 22 2008

Status

approved