Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
The OEIS is supported by the many generous donors to the OEIS Foundation.
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A293524
a(n) = Product_{d|n, d>1} prime(A052409(d)).
6
1, 2, 2, 6, 2, 8, 2, 30, 6, 8, 2, 48, 2, 8, 8, 210, 2, 48, 2, 48, 8, 8, 2, 480, 6, 8, 30, 48, 2, 128, 2, 2310, 8, 8, 8, 864, 2, 8, 8, 480, 2, 128, 2, 48, 48, 8, 2, 6720, 6, 48, 8, 48, 2, 480, 8, 480, 8, 8, 2, 3072, 2, 8, 48, 30030, 8, 128, 2, 48, 8, 128, 2, 17280, 2, 8, 48, 48, 8, 128, 2, 6720, 210, 8, 2, 3072, 8, 8, 8, 480
(list; graph; refs; listen; history; text; internal format)
OFFSET
1,2
LINKS
Antti Karttunen, Table of n, a(n) for n = 1..16384
Index entries for sequences computed from exponents in factorization of n
FORMULA
a(n) = Product_{d|n, d>1} A000040(A052409(d)).
Other identities. For all n >= 1:
A001222(a(n)) = A032741(n).
A007814(a(n)) = A183096(n).
A064989(a(n)) = A294875(n).
PROG
(PARI) A293524(n) = { my(m=1, e); fordiv(n, d, if(d>1, e = ispower(d); if(!e, m += m, m *= prime(e)))); m; };
CROSSREFS
Cf. A000040, A052409, A294873, A294874, A294875.
Cf. also A293514, A293442.
Sequence in context: A294876 A293514 A028330 * A363831 A233591 A071052
Adjacent sequences: A293521 A293522 A293523 * A293525 A293526 A293527
KEYWORD
nonn
AUTHOR
Antti Karttunen, Nov 11 2017
STATUS
approved

Lookup Welcome Wiki Register Music Plot 2 Demos Index WebCam Contribute Format Style Sheet Transforms Superseeker Recents
The OEIS Community
Maintained by The OEIS Foundation Inc.
Last modified October 21 04:56 EDT 2024. Contains 376966 sequences.
License Agreements, Terms of Use, Privacy Policy