A354092 -id:A354092 - cp's OEIS frontend

A354096 a(n) = A354092(sigma(A354091(n))).

1, 3, 1, 31, 3, 3, 1, 39, 13, 9, 9, 31, 7, 3, 3, 295, 3, 39, 2, 93, 1, 27, 6, 39, 133, 21, 2, 31, 21, 9, 1, 1953, 9, 9, 3, 403, 19, 6, 7, 117, 3, 3, 5, 279, 39, 18, 27, 295, 57, 399, 3, 217, 6, 6, 27, 39, 2, 63, 9, 93, 31, 3, 13, 19531, 21, 27, 11, 93, 6, 9, 21, 507, 37, 57, 133, 62, 9, 21, 2, 885, 25, 9, 18, 31, 9

Offset: 1

Antti Karttunen, May 17 2022

Cf. A000203, A003627, A007949, A010872, A329963, A354091, A354092, A354093, A354095.

Cf. also A326042, A354088 for variants.

A354091(n) = { my(f=factor(n)); for(k=1,#f~, if(2==(f[k,1]%3), for(i=1+primepi(f[k,1]),oo,if(2==(prime(i)%3), f[k,1]=prime(i); break)))); factorback(f); };
A354092(n) = { my(f=factor(n)); for(k=1,#f~, if(2==(f[k,1]%3), if(2==f[k,1], f[k,1]--, forstep(i=primepi(f[k,1])-1,0,-1,if(2==(prime(i)%3), f[k,1]=prime(i); break))))); factorback(f); };
A354096(n) = A354092(sigma(A354091(n)));

Multiplicative with a(p^e) = A354092((q^(e+1)-1)/(q-1)), where q = A003627(1+n) if p = A003627(n), otherwise q = p.
a(n) = A354092(A354093(n)) = A354095(A354091(n)) = A354092(A000203(A354091(n))).
For all n >= 1, A010872(a(n)) = A010872(A354095(n)).
For all k in A329963, A007949(a(k)) = A007949(sigma(k)) = A354100(k) = 0.

A354095 a(n) = A354092(sigma(n)).

Original entry on oeis.org

1, 3, 1, 7, 3, 3, 1, 6, 13, 9, 3, 7, 7, 3, 3, 31, 9, 39, 2, 21, 1, 9, 3, 6, 31, 21, 2, 7, 6, 9, 1, 63, 3, 27, 3, 91, 19, 6, 7, 18, 21, 3, 5, 21, 39, 9, 3, 31, 57, 93, 9, 49, 27, 6, 9, 6, 2, 18, 6, 21, 31, 3, 13, 127, 21, 9, 11, 63, 3, 9, 9, 78, 37, 57, 31, 14, 3, 21, 2, 93, 25, 63, 21, 7, 27, 15, 6, 18, 18, 117, 7

Offset: 1

Antti Karttunen, May 17 2022

Cf. A000203, A007949, A010872, A354092, A354093, A354096.

Cf. also A350073.

A354095(n) = { my(f=factor(sigma(n))); for(k=1,#f~, if(2==(f[k,1]%3), if(2==f[k,1], f[k,1]--, forstep(i=primepi(f[k,1])-1,0,-1,if(2==(prime(i)%3), f[k,1]=prime(i); break))))); factorback(f); };

Multiplicative with a(p^e) = A354092(1 + p + p^2 + ... + p^e).
a(n) = A354092(A000203(n)).
For all n >= 1, A010872(a(n)) = A010872(A354096(n)), A007949(a(n)) = A007949(A000203(n)).

A354091 Fully multiplicative prime shift where the primes of the form 3k+2 are replaced by the next larger such prime, and primes of the form 3k and 3k+1 stay as they are.

Original entry on oeis.org

1, 5, 3, 25, 11, 15, 7, 125, 9, 55, 17, 75, 13, 35, 33, 625, 23, 45, 19, 275, 21, 85, 29, 375, 121, 65, 27, 175, 41, 165, 31, 3125, 51, 115, 77, 225, 37, 95, 39, 1375, 47, 105, 43, 425, 99, 145, 53, 1875, 49, 605, 69, 325, 59, 135, 187, 875, 57, 205, 71, 825, 61, 155, 63, 15625, 143, 255, 67, 575, 87, 385, 83, 1125

Offset: 1

Antti Karttunen, May 17 2022

Permutation of odd numbers. Preserves the prime signature.

			The primes in A003627 are replaced by the next prime in that sequence, as: 2 -> 5 -> 11 -> 17 -> 23 -> 29 -> 41 -> ..., while other kinds of primes (A002476) stay intact, thus for 60 = 2^2 * 3^1 * 5^1, we have a(60) = 5^2 * 3^1 * 11^1 = 825.

Antti Karttunen, Table of n, a(n) for n = 1..16383
Index entries for sequences related to sigma(n)

Cf. A003627, A007645, A074941, A353815.
Cf. A354092 (left inverse), A354093 (inverse Möbius transform), A354094 (Möbius transform), A354095, A354096.
Cf. also A003961, A332818, A348746 for similar constructions.

A354091(n) = { my(f=factor(n)); for(k=1,#f~, if(2==(f[k,1]%3), for(i=1+primepi(f[k,1]),oo,if(2==(prime(i)%3), f[k,1]=prime(i); break)))); factorback(f); };

Fully multiplicative with a(A003627(n)) = A003627(1+n), a(A007645(n)) = A007645(n).
For all n >= 1, A354092(a(n)) = n.
For all n >= 1, A046523(a(n)) = A046523(n) and A074941(a(n)) = A074941(n).

cp's OEIS Frontend

A354096 a(n) = A354092(sigma(A354091(n))).

Views

Author

Keywords

Links

Crossrefs

Programs

PARI

Formula

A354095 a(n) = A354092(sigma(n)).

Views

Author

Keywords

Links

Crossrefs

Programs

PARI

Formula

A354091 Fully multiplicative prime shift where the primes of the form 3k+2 are replaced by the next larger such prime, and primes of the form 3k and 3k+1 stay as they are.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

PARI

Formula