login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A069150 Integers of the form k*k!/A062758(k) where A062758(k) is the product of squares of divisors of k. 0
1, 2, 24, 720, 4480, 3628800, 1925, 479001600, 387459072, 20922789888000, 6402373705728000, 5516784599040000, 1124000727777607680000, 135277939046250, 24817936069329577574400, 553211880832106496000000 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,2

LINKS

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

MATHEMATICA

Rest[Select[Table[k! k/(Times@@Divisors[k])^2, {k, 30}], IntegerQ]] (* Harvey P. Dale, Oct 17 2020 *)

PROG

(PARI) for(n=2, 30, if((n*(n!))%(n^numdiv(n))==0, print1((n*(n!))/(n^numdiv(n)), ", ")))

CROSSREFS

Sequence in context: A009750 A030438 A012723 * A323491 A046977 A309205

Adjacent sequences:  A069147 A069148 A069149 * A069151 A069152 A069153

KEYWORD

easy,nonn

AUTHOR

Benoit Cloitre, Apr 08 2002

STATUS

approved

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

License Agreements, Terms of Use, Privacy Policy. .

Last modified May 21 08:31 EDT 2022. Contains 353898 sequences. (Running on oeis4.)