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

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A323508 a(n) = A323505(A156552(n)). 2
1, 2, 4, 6, 8, 12, 16, 24, 12, 24, 32, 48, 64, 48, 24, 120, 128, 36, 256, 96, 48, 96, 512, 240, 24, 192, 48, 192, 1024, 72, 2048, 720, 96, 384, 48, 144, 4096, 768, 192, 480, 8192, 144, 16384, 384, 96, 1536, 32768, 1440, 48, 72, 384, 768, 65536, 144, 96, 960, 768, 3072, 131072, 288, 262144, 6144, 192, 5040, 192, 288, 524288, 1536, 1536 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,2

COMMENTS

Sequence contains only terms of A001013 and each a(n) is a multiple of A112624(n).

LINKS

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

FORMULA

a(n) = A323505(A156552(n)).

PROG

(PARI)

A001511(n) = (1+valuation(n, 2));

A036987(n) = !bitand(n, 1+n);

A323505(n) = if(!n, 1, if(!(n%2), 2*A323505(n/2), (A001511(n+1)+1-A036987(n))*A323505((n-1)/2)));

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)};

A156552(n) = if(1==n, 0, if(!(n%2), 1+(2*A156552(n/2)), 2*A156552(A064989(n))));

A323508(n) = A323505(A156552(n));

CROSSREFS

Cf. A001013, A112624, A156552, A323505.

Sequence in context: A065386 A048951 A058629 * A095810 A025487 A279537

Adjacent sequences:  A323505 A323506 A323507 * A323509 A323510 A323511

KEYWORD

nonn

AUTHOR

Antti Karttunen, Jan 17 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 February 22 05:17 EST 2019. Contains 320385 sequences. (Running on oeis4.)