login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A324895 Largest proper divisor of A276086(n); a(0) = 1. 2
1, 1, 1, 3, 3, 9, 1, 5, 5, 15, 15, 45, 5, 25, 25, 75, 75, 225, 25, 125, 125, 375, 375, 1125, 125, 625, 625, 1875, 1875, 5625, 1, 7, 7, 21, 21, 63, 7, 35, 35, 105, 105, 315, 35, 175, 175, 525, 525, 1575, 175, 875, 875, 2625, 2625, 7875, 875, 4375, 4375, 13125, 13125, 39375, 7, 49, 49, 147, 147, 441, 49, 245, 245, 735, 735, 2205, 245, 1225, 1225 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,4

LINKS

Antti Karttunen, Table of n, a(n) for n = 0..30030

Index entries for sequences related to primorial base

Index entries for sequences related to primorial numbers

FORMULA

a(n) = A032742(A276086(n)).

For n >= 0, a(A002110(n)) = 1.

For n >= 1, a(n) = A276086(n) / A053669(n) = A276086(A276151(n)).

For n >= 1, A276085(a(n)) = A276151(n).

For n >= 1, a(A108951(n)) = A324896(n).

PROG

(PARI)

A032742(n) = if(1==n, n, n/vecmin(factor(n)[, 1]));

A276086(n) = { my(i=0, m=1, pr=1, nextpr); while((n>0), i=i+1; nextpr = prime(i)*pr; if((n%nextpr), m*=(prime(i)^((n%nextpr)/pr)); n-=(n%nextpr)); pr=nextpr); m; };

A324895(n) = A032742(A276086(n));

CROSSREFS

Cf. A002110, A032742, A053669, A276151, A276085, A276086, A324896.

Sequence in context: A109695 A010610 A140059 * A070517 A290408 A028232

Adjacent sequences:  A324892 A324893 A324894 * A324896 A324897 A324898

KEYWORD

nonn

AUTHOR

Antti Karttunen, Mar 30 2019

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 June 24 13:17 EDT 2019. Contains 324325 sequences. (Running on oeis4.)