login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A063774 Number of divisors of n^2 is a square. 2
1, 6, 10, 14, 15, 16, 21, 22, 26, 33, 34, 35, 36, 38, 39, 46, 51, 55, 57, 58, 62, 65, 69, 74, 77, 81, 82, 85, 86, 87, 91, 93, 94, 95, 100, 106, 111, 115, 118, 119, 122, 123, 129, 133, 134, 141, 142, 143, 145, 146, 155, 158, 159, 161, 166, 177, 178, 183, 185, 187, 194 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,2

LINKS

Harry J. Smith, Table of n, a(n) for n = 1..1000

FORMULA

{n: A048691(n) in A000290}. - R. J. Mathar, Aug 09 2012

EXAMPLE

n=2: a(2) = 6 because the number of divisors of 6^2 is 9, a square.

MATHEMATICA

Select[Range[200], IntegerQ[Sqrt[DivisorSigma[0, #^2]]]&] (* Harvey P. Dale, Jun 06 2012 *)

PROG

(PARI) j=[]; for(n=1, 500, a=numdiv(n^2); if(issquare(a), j=concat(j, n))); j

(PARI) n=0; for (m=1, 10^9, if(issquare(numdiv(m^2)), write("b063774.txt", n++, " ", m); if (n==1000, break))) \\ Harry J. Smith, Aug 30 2009

(PARI) is(n)=my(f=factor(n)[, 2]); issquare(prod(i=1, #f, 2*f[i]+1)) \\ Charles R Greathouse IV, Sep 18 2015

CROSSREFS

Sequence in context: A129146 A315158 A315159 * A068993 A138592 A085232

Adjacent sequences:  A063771 A063772 A063773 * A063775 A063776 A063777

KEYWORD

easy,nonn

AUTHOR

Jason Earls, Aug 15 2001

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified September 24 06:13 EDT 2021. Contains 347623 sequences. (Running on oeis4.)