A346474 -id:A346474 - cp's OEIS frontend

A345930 a(n) = A344756(A276086(n)).

1, 1, 1, 2, 7, 1, 1, 1, 1, 13, 41, 2, 9, 11, 37, 2, 47, 3, 11, 7, 43, 19, 53, 4, 13, 17, 49, 11, 59, 1, 1, 1, 1, 17, 55, 1, 1, 1, 1, 106, 317, 19, 73, 92, 289, 127, 359, 13, 87, 113, 331, 148, 401, 11, 101, 134, 373, 169, 443, 2, 11, 13, 47, 2, 61, 17, 69, 86, 277, 121, 347, 2, 83, 107, 319, 2, 389, 31, 97, 128, 19

Offset: 1

Antti Karttunen, Jul 19 2021

Antti Karttunen, Table of n, a(n) for n = 1..13860
Index entries for sequences related to primorial base

Cf. A003415, A069359, A276086, A327860, A329029, A344756, A346469.

Cf. also A342002, A346474, A346475 (compare the scatter plots).

A003415(n) = if(n<=1, 0, my(f=factor(n)); n*sum(i=1, #f~, f[i, 2]/f[i, 1]));
A069359(n) = (n*sumdiv(n, d, isprime(d)/d)); \\ From A069359
A344756(n) = { my(u=A003415(n)); (u/gcd(u,A069359(n))); };
A276086(n) = { my(m=1, p=2); while(n, m *= (p^(n%p)); n = n\p; p = nextprime(1+p)); (m); };
A345930(n) = A344756(A276086(n));

a(n) = A344756(A276086(n)).

a(n) = A327860(n) / A346469(n) = A327860(n) / gcd(A327860(n), A329029(n)).

A346475 a(n) = A342919(A276086(n)).

Original entry on oeis.org

0, 1, 1, 5, 1, 7, 1, 7, 1, 31, 13, 41, 1, 1, 11, 37, 2, 47, 1, 11, 7, 43, 19, 53, 2, 13, 17, 49, 11, 59, 1, 3, 5, 41, 17, 55, 1, 59, 71, 247, 53, 317, 19, 73, 23, 289, 127, 359, 13, 29, 113, 331, 37, 401, 11, 101, 67, 373, 169, 443, 1, 11, 13, 47, 5, 61, 17, 23, 43, 277, 121, 347, 1, 83, 107, 319, 71, 389, 31, 97, 2, 361, 163

Offset: 0

Antti Karttunen, Jul 21 2021

For n >= 1, each term a(n) is a divisor of A342002(n).

Antti Karttunen, Table of n, a(n) for n = 0..13860
Index entries for sequences related to primorial base

Cf. A001615, A003415, A276086, A327860, A342919, A346470, A346471.

Cf. also A342002, A345930, A346474 for sequences with similar scatter plots.

A001615(n) = if(1==n,n, my(f=factor(n)); prod(i=1, #f~, f[i, 1]^f[i, 2] + f[i, 1]^(f[i, 2]-1))); \\ After code in A001615
A003415(n) = if(n<=1, 0, my(f=factor(n)); n*sum(i=1, #f~, f[i, 2]/f[i, 1]));
A342919(n) = { my(u=A003415(n)); (u/gcd(u, A001615(n))); };
A276086(n) = { my(m=1, p=2); while(n, m *= (p^(n%p)); n = n\p; p = nextprime(1+p)); (m); };
A346475(n) = A342919(A276086(n));

a(n) = A342919(A276086(n)).

a(n) = A327860(n) / gcd(A327860(n), A346470(n)).

cp's OEIS Frontend

A345930 a(n) = A344756(A276086(n)).

Views

Author

Keywords

Links

Crossrefs

Programs

PARI

Formula