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!)
A063777 t(n^2) is a square and sets a new record for such squares, where t(n) = (sigma(n)-n)*omega(n); or t(n)= A001065(n)*A001221(n). 0
1, 3, 49, 114, 290, 1266, 3026, 4587, 8642, 14949, 21504, 47976, 74535, 79922, 102818, 112960, 172658, 280226, 632018, 662546, 693794, 791858, 969698, 1516322, 1758962, 2128898, 2184626, 2298242, 2414738, 2594882, 2718578 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,2

LINKS

Table of n, a(n) for n=1..31.

EXAMPLE

t(49^2) = 400, a square.

PROG

(PARI) a=0; t(n) = (sigma(n)-n)*omega(n);

for(n=1, 10^7, x=t(n^2); if(issquare(x), b=x; if(b>a, a=b; print1(n, ", "))))

(PARI) t(n) = (sigma(n) - n)*omega(n);

{ n=0; a=-1; for (m=1, 10^9, if(issquare(b=t(m^2)), if(b>a, a=b; write("b063777.txt", n++, " ", m); if (n==31, break))) ) } \\ Harry J. Smith, Aug 31 2009

CROSSREFS

Cf. A001065, A001221.

Sequence in context: A160763 A041523 A054206 * A212651 A225317 A288527

Adjacent sequences:  A063774 A063775 A063776 * A063778 A063779 A063780

KEYWORD

nonn

AUTHOR

Jason Earls, Aug 16 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 July 26 22:10 EDT 2021. Contains 346300 sequences. (Running on oeis4.)