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!)
A329899 If A181815(n) is odd, a(n) = A064989(A025487(n)), otherwise a(n) = A025487(n)/2. 5
1, 1, 2, 2, 4, 6, 8, 12, 6, 16, 4, 24, 30, 32, 36, 48, 60, 64, 72, 12, 96, 30, 8, 120, 128, 144, 180, 192, 210, 216, 240, 256, 288, 360, 384, 420, 432, 36, 480, 512, 24, 576, 60, 16, 720, 768, 840, 864, 900, 960, 1024, 1080, 1152, 210, 1260, 1296, 1440, 1536, 1680, 1728, 1800, 1920, 2048, 2160, 2304, 2310, 2520, 2592, 72 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,3

COMMENTS

If 2-adic and 3-adic valuations of A025487(n) are equal, then a(n) = A064989(A025487(n)), otherwise a(n) = A025487(n)/2.

Only terms of A025487 occur, and each one of them occurs exactly twice.

LINKS

Antti Karttunen, Table of n, a(n) for n = 1..10000

FORMULA

If A181815(n) is odd, a(n) = A064989(A025487(n)), otherwise a(n) = A025487(n)/2.

a(n) = A025487(A329904(n)).

PROG

(PARI)

A181815(n) = A329900(A025487(n));

A064989(n) = {my(f); f = factor(n); if((n>1 && f[1, 1]==2), f[1, 2] = 0); for (i=1, #f~, f[i, 1] = precprime(f[i, 1]-1)); factorback(f)};

A329899(n) = if(A181815(n)%2, A064989(A025487(n)), A025487(n)/2);

CROSSREFS

Cf. A025487, A064989, A181815, A329897, A329898, A329904.

Sequence in context: A241383 A258125 A147982 * A051466 A320193 A260215

Adjacent sequences:  A329896 A329897 A329898 * A329900 A329901 A329902

KEYWORD

nonn

AUTHOR

Antti Karttunen, Dec 24 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 May 7 16:00 EDT 2021. Contains 343652 sequences. (Running on oeis4.)