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

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A346091 a(n) = A328571(A108951(n)). 7
 2, 3, 5, 3, 7, 5, 11, 15, 35, 7, 13, 5, 17, 11, 7, 15, 19, 35, 23, 7, 11, 13, 29, 35, 77, 17, 55, 11, 31, 77, 37, 21, 13, 19, 143, 35, 41, 23, 17, 77, 43, 143, 47, 13, 77, 29, 53, 35, 2431, 77, 19, 17, 59, 55, 221, 11, 23, 31, 61, 77, 67, 37, 143, 21, 323, 13, 71, 19, 29, 143, 73, 385, 79, 41, 1001, 23, 221, 17, 83, 77, 385 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,1 COMMENTS All terms are squarefree (in A005117). - Antti Karttunen, Apr 03 2022 LINKS Antti Karttunen, Table of n, a(n) for n = 1..10201 FORMULA a(n) = A328571(A108951(n)) = A007947(A276086(A108951(n))). a(n) = A324886(n) / A344592(n). For all n >= 1, a(A000040(n)) = A000040(1+n). PROG (PARI) A002110(n) = prod(i=1, n, prime(i)); A108951(n) = { my(f=factor(n)); prod(i=1, #f~, A002110(primepi(f[i, 1]))^f[i, 2]) }; A328571(n) = { my(m=1, p=2); while(n, m *= (p^!!(n%p)); n = n\p; p = nextprime(1+p)); (m); }; A346091(n) = A328571(A108951(n)); CROSSREFS Cf. A000040, A002110, A005117, A007947, A108951, A276086, A324886, A328571, A344592, A346093 [= A276085(a(n))], A351955 (rgs-transform). Sequence in context: A073482 A318411 A225680 * A107685 A161984 A337362 Adjacent sequences: A346088 A346089 A346090 * A346092 A346093 A346094 KEYWORD nonn AUTHOR Antti Karttunen, Jul 09 2021 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.

Last modified February 5 10:05 EST 2023. Contains 360084 sequences. (Running on oeis4.)