[go: up one dir, main page]

login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A353517
The largest proper divisor of A276086(2*n) reduced modulo 4, where A276086(n) the primorial base exp-function.
4
1, 1, 3, 1, 1, 3, 1, 1, 3, 1, 1, 3, 1, 1, 3, 1, 3, 1, 3, 3, 1, 3, 3, 1, 3, 3, 1, 3, 3, 1, 3, 1, 3, 1, 1, 3, 1, 1, 3, 1, 1, 3, 1, 1, 3, 1, 3, 1, 3, 3, 1, 3, 3, 1, 3, 3, 1, 3, 3, 1, 3, 1, 3, 1, 1, 3, 1, 1, 3, 1, 1, 3, 1, 1, 3, 1, 3, 1, 3, 3, 1, 3, 3, 1, 3, 3, 1, 3, 3, 1, 3, 1, 3, 1, 1, 3, 1, 1, 3, 1, 1, 3, 1, 1, 3, 1
OFFSET
0,3
FORMULA
a(n) = A353516(2*n) = A010873(A324895(2*n)).
For n >= 1, a(n) = (A353487(n) * A353527(n)) mod 4.
For n >= 1, a(n) = A353487(n-1). [See A353516 for a proof]
PROG
(PARI)
A032742(n) = if(1==n, n, n/vecmin(factor(n)[, 1]));
A276086(n) = { my(m=1, p=2); while(n, m *= (p^(n%p)); n = n\p; p = nextprime(1+p)); (m); };
A353517(n) = (A324895(2*n)%4);
CROSSREFS
Even bisection of A353516. Sequence A353487 shifted one term right.
Sequence in context: A132951 A366520 A366519 * A353487 A356308 A228925
KEYWORD
nonn
AUTHOR
Antti Karttunen, Apr 24 2022
STATUS
approved