A353413 a(n) = A000265(A064216(n)).

1, 1, 3, 5, 1, 7, 11, 3, 13, 17, 5, 19, 9, 1, 23, 29, 7, 15, 31, 11, 37, 41, 3, 43, 25, 13, 47, 21, 17, 53, 59, 5, 33, 61, 19, 67, 71, 9, 35, 73, 1, 79, 39, 23, 83, 55, 29, 51, 89, 7, 97, 101, 15, 103, 107, 31, 109, 57, 11, 65, 49, 37, 27, 113, 41, 127, 85, 3, 131, 137, 43, 77, 69, 25, 139, 149, 13, 87, 151, 47, 95

Offset

1,3

Links

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

Index entries for sequences computed from indices in prime factorization

Formula

a(n) = A353412(2*n-1) = A000265(A064216(n)).

For all n >= 1, A000120(a(n)) = A254044(n).

Prog

(PARI)
A000265(n) = (n>>valuation(n, 2));
A064989(n) = { my(f = factor(A000265(n))); for(i=1, #f~, f[i, 1] = precprime(f[i, 1]-1)); factorback(f); };
A353413(n) = A000265(A064989(n+n-1));

Crossrefs

Odd bisection of A353412.

Cf. A000120, A000265, A064216, A064989, A254044.

Cf. also A285702.

Sequence in context: A337128 A208509 A086233 * A318190 A289714 A367743

Adjacent sequences: A353410 A353411 A353412 * A353414 A353415 A353416

Keyword

nonn

Author

Antti Karttunen, Apr 18 2022

Status

approved