A349376 -id:A349376 - cp's OEIS frontend

A349378 a(n) = A349376(n) + A349377(n).

2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -6, 0, 0, 0, 10, 9, 0, 0, -8, 0, -30, 0, -4, 0, 0, 24, 27, 0, 0, 0, 34, 0, -40, 0, -14, -6, 0, 0, -34, 16, -66, 0, -14, 0, 10, 42, 44, 0, 0, 0, 166, 0, 0, -8, 11, 42, -70, 0, -20, 0, -172, 0, -70, 0, 0, -42, -22, 56, -70, 0, -103, 1, 0, 0, 216, 60, 0, 0, 78

Offset: 1

Antti Karttunen, Nov 17 2021

sign

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

Cf. A006368, A006369, A349376, A349377.

Cf. also A349352, A349369.

A349378(n) = (A349376(n)+A349377(n)); \\ Needs also code from A349376 and A349377.

a(1) = 2, and for n >1, a(n) = -Sum_{d|n, 1A349376(d) * A349377(n/d). [As the sequences are Dirichlet inverses of each other]

A349398 Dirichlet convolution of A048673 with the Dirichlet inverse of its inverse permutation.

Original entry on oeis.org

1, 0, 0, 0, 0, 1, -5, 8, 0, -6, -3, 2, 0, 19, -5, -4, -4, 20, -19, 22, 6, -15, 3, -8, 0, 0, 16, 16, -18, 24, -40, 70, 9, -24, 21, -7, -50, 55, 8, -24, 6, -41, -15, 58, 20, -17, -31, 108, 27, 70, -37, -24, 0, -20, -49, -98, 6, 26, -13, 21, -15, 62, 158, 84, -22, 9, -49, 130, -67, 12, -49, 62, -29, 112, 4, -60, 103, 16

Offset: 1

Antti Karttunen, Nov 19 2021

sign

Dirichlet convolution of A048673 with A349358, which is the Dirichlet inverse of A064216 (inverse permutation of A048673). Therefore, convolving A064216 with this sequence gives A048673.

Note how for n = 1 .. 35, a(n) = -A349397(n).

Antti Karttunen, Table of n, a(n) for n = 1..16384
Index entries for sequences computed from indices in prime factorization

Cf. A003961, A048673, A064216, A064989, A323893, A349397 (Dirichlet inverse), A349399 (sum with it).

Cf. also A349376, A349377, A349385.

A048673(n) = { my(f = factor(n)); for (i=1, #f~, f[i, 1] = nextprime(f[i, 1]+1)); (1/2)*(1+factorback(f)); };
A064216(n) = { my(f = factor(n+n-1)); 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); };
memoA349358 = Map();
A349358(n) = if(1==n,1,my(v); if(mapisdefined(memoA349358,n,&v), v, v = -sumdiv(n,d,if(dA064216(n/d)*A349358(d),0)); mapput(memoA349358,n,v); (v)));
A349398(n) = sumdiv(n,d,A048673(n/d)*A349358(d));

a(n) = Sum_{d|n} A048673(n/d) * A349358(d).

A349614 Dirichlet convolution of A064664 (the inverse permutation of EKG-permutation, A064413) with the Dirichlet inverse of A064413.

Original entry on oeis.org

1, 0, 1, -3, 7, -7, 2, 6, -8, -10, 5, 9, 14, 2, -41, -1, 17, 27, 15, -6, -38, -18, 13, 10, -32, -29, 18, 33, 18, 62, 29, -13, -31, -53, -107, 25, 48, -51, -86, 13, 30, 116, 58, 23, 88, -34, 37, -47, -30, 56, -113, 3, 45, -39, -137, -154, -73, -67, 41, 160, 84, -91, 174, 56, -154, 152, 91, 6, -113, 246, 58, -185, 56

Offset: 1

Antti Karttunen, Nov 23 2021

sign

Obviously, convolving this with A064413 gives its inverse permutation A064664.

Antti Karttunen, Table of n, a(n) for n = 1..20000
Index entries for sequences related to EKG sequence

Cf. A064413, A064664, A349400, A349613 (Dirichlet inverse), A349615 (sum with it), A349617.

Cf. also pairs A349376, A349377 and A349397, A349398 for similar constructions.

up_to = 32768;
v064413 = readvec("b064413_upto65539_terms_only.txt"); \\ Data prepared with Chai Wah Wu's Dec 08 2014 Python-program given in A064413.
A064413(n) = v064413[n];
\\ Then its inverse A064664 is prepared:
m064664 = Map();
for(n=1,65539,mapput(m064664,A064413(n),n));
A064664(n) = mapget(m064664,n);
memoA349400 = Map();
A349400(n) = if(1==n,1,my(v); if(mapisdefined(memoA349400,n,&v), v, v = -sumdiv(n,d,if(dA064413(n/d)*A349400(d),0)); mapput(memoA349400,n,v); (v)));
A349614(n) = sumdiv(n,d,A064664(d)*A349400(n/d));

a(n) = Sum_{d|n} A064664(d) * A349400(n/d).

A349377 Dirichlet convolution of A006369 with the Dirichlet inverse of A006368, where A006368 is the "amusical permutation", and A006369 is its inverse permutation.

Original entry on oeis.org

1, 0, 0, -1, 3, -5, 4, 2, -1, -11, 7, 7, 7, -14, -7, -3, 10, -2, 11, 16, -10, -25, 14, -6, 2, -25, 0, 18, 17, 11, 18, 4, -17, -36, -10, 20, 21, -39, -17, -18, 24, 12, 25, 34, -7, -50, 28, 2, 8, -15, -24, 34, 31, 3, -20, -16, -27, -61, 35, 30, 35, -64, -8, -5, -20, 23, 39, 50, -34, 6, 42, -44, 42, -75, -15, 52, -22, 23

Offset: 1

Antti Karttunen, Nov 17 2021

sign

Obviously, convolving this sequence with A006368 gives its inverse A006369 from n >= 1 onward.

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

Cf. A006368, A006369, A349351, A349376 (Dirichlet inverse), A349378 (sum with it).

Cf. also pairs A349613, A349614 and A349397, A349398 for similar constructions.

A006368(n) = ((3*n)+(n%2))\(2+((n%2)*2));
A006369(n) = if(!(n%3),(2/3)*n,(1/3)*if(1==(n%3),((4*n)-1),((4*n)+1)));
memoA349351 = Map();
A349351(n) = if(1==n,1,my(v); if(mapisdefined(memoA349351,n,&v), v, v = -sumdiv(n,d,if(dA006368(n/d)*A349351(d),0)); mapput(memoA349351,n,v); (v)));
A349377(n) = sumdiv(n,d,A006369(d)*A349351(n/d));

a(n) = Sum_{d|n} A006369(d) * A349351(n/d).

a(n) = A349378(n) - A349376(n).

A349397 Dirichlet convolution of A064216 with the Dirichlet inverse of its inverse permutation.

Original entry on oeis.org

1, 0, 0, 0, 0, -1, 5, -8, 0, 6, 3, -2, 0, -19, 5, 4, 4, -20, 19, -22, -6, 15, -3, 8, 0, 0, -16, -16, 18, -24, 40, -70, -9, 24, -21, 8, 50, -55, -8, 24, -6, 31, 15, -58, -20, 17, 31, -92, -2, -70, 37, 24, 0, 20, 49, 18, -6, -26, 13, -33, 15, -62, -158, -20, 22, -15, 49, -130, 67, 48, 49, -58, 29, -112, -4, 60, -73, -16

Offset: 1

Antti Karttunen, Nov 19 2021

sign

Dirichlet convolution of A064216 with A323893, which is the Dirichlet inverse of A048673. Therefore, convolving A048673 with this sequence gives A064216.

Note how for n = 1 .. 35, a(n) = -A349398(n).

Antti Karttunen, Table of n, a(n) for n = 1..16384
Index entries for sequences computed from indices in prime factorization

Cf. A003961, A048673, A064216, A064989, A323893, A349398 (Dirichlet inverse), A349399 (sum with it), A349384.

Cf. also pairs A349376, A349377 and A349613, A349614 for similar constructions.

A048673(n) = { my(f = factor(n)); for (i=1, #f~, f[i, 1] = nextprime(f[i, 1]+1)); (1/2)*(1+factorback(f)); };
A064216(n) = { my(f = factor(n+n-1)); 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); };
memoA323893 = Map();
A323893(n) = if(1==n,1,my(v); if(mapisdefined(memoA323893,n,&v), v, v = -sumdiv(n,d,if(dA048673(n/d)*A323893(d),0)); mapput(memoA323893,n,v); (v)));
A349397(n) = sumdiv(n,d,A064216(n/d)*A323893(d));

a(n) = Sum_{d|n} A064216(n/d) * A323893(d).

A349613 Dirichlet convolution of A064413 (EKG-permutation) with the Dirichlet inverse of its inverse permutation.

Original entry on oeis.org

1, 0, -1, 3, -7, 7, -2, -6, 9, 10, -5, -15, -14, -2, 55, 10, -17, -41, -15, -36, 42, 18, -13, 44, 81, 29, -35, -45, -18, -180, -29, -23, 41, 53, 135, 99, -48, 51, 114, 131, -30, -140, -58, -53, -303, 34, -37, -120, 34, -196, 147, -87, -45, 226, 207, 166, 103, 67, -41, 466, -84, 91, -288, 13, 350, -258, -91, -108

Offset: 1

Antti Karttunen, Nov 23 2021

sign

Obviously, convolving this with A064664 gives A064413 back.

Antti Karttunen, Table of n, a(n) for n = 1..20000
Index entries for sequences related to EKG sequence

Cf. A064413, A064664, A323411, A349614 (Dirichlet inverse), A349615 (sum with it), A349616.

Cf. also pairs A349376, A349377 and A349397, A349398 for similar constructions.

up_to = 32768;
v064413 = readvec("b064413_upto65539_terms_only.txt"); \\ Data prepared with Chai Wah Wu's Dec 08 2014 Python-program given in A064413.
A064413(n) = v064413[n];
\\ Then its inverse A064664 is prepared:
m064664 = Map();
for(n=1,65539,mapput(m064664,A064413(n),n));
A064664(n) = mapget(m064664,n);
DirInverseCorrect(v) = { my(u=vector(#v)); u[1] = (1/v[1]); for(n=2, #v, u[n] = (-u[1]*sumdiv(n, d, if(dA064664(n)));
A323411(n) = v323411[n];
A349613(n) = sumdiv(n,d,A064413(d)*A323411(n/d));

a(n) = Sum_{d|n} A064413(d) * A323411(n/d).

A349368 Dirichlet inverse of A006369, the inverse permutation of "amusical permutation".

Original entry on oeis.org

1, -3, -2, 4, -7, 8, -9, -8, -2, 29, -15, -18, -17, 35, 18, 16, -23, 4, -25, -68, 22, 61, -31, 44, 16, 67, -2, -76, -39, -104, -41, -32, 38, 93, 79, 6, -49, 99, 42, 168, -55, -120, -57, -140, 10, 125, -63, -104, 16, -128, 58, -148, -71, 0, 137, 184, 62, 157, -79, 354, -81, 163, 14, 64, 151, -216, -89, -212, 78, -445

Offset: 1

Antti Karttunen, Nov 17 2021

sign

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

Cf. A006369, A349369.

Cf. also A349351, A349376.

A006369(n) = if(!(n%3),(2/3)*n,(1/3)*if(1==(n%3),((4*n)-1),((4*n)+1)));
memoA349368 = Map();
A349368(n) = if(1==n,1,my(v); if(mapisdefined(memoA349368,n,&v), v, v = -sumdiv(n,d,if(dA006369(n/d)*A349368(d),0)); mapput(memoA349368,n,v); (v)));

a(1) = 1; a(n) = -Sum_{d|n, d < n} A006369(n/d) * a(d).

a(n) = A349369(n) - A006369(n).

cp's OEIS Frontend

A349378 a(n) = A349376(n) + A349377(n).

Views

Author

Keywords

Links

Crossrefs

Programs

PARI

Formula

A349398 Dirichlet convolution of A048673 with the Dirichlet inverse of its inverse permutation.

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

PARI

Formula

A349614 Dirichlet convolution of A064664 (the inverse permutation of EKG-permutation, A064413) with the Dirichlet inverse of A064413.

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

PARI

Formula

A349377 Dirichlet convolution of A006369 with the Dirichlet inverse of A006368, where A006368 is the "amusical permutation", and A006369 is its inverse permutation.

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

PARI

Formula

A349397 Dirichlet convolution of A064216 with the Dirichlet inverse of its inverse permutation.

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

PARI

Formula

A349613 Dirichlet convolution of A064413 (EKG-permutation) with the Dirichlet inverse of its inverse permutation.

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

PARI

Formula

A349368 Dirichlet inverse of A006369, the inverse permutation of "amusical permutation".

Views

Author

Keywords

Links

Crossrefs

Programs

PARI

Formula