A293222 -id:A293222 - cp's OEIS frontend

A351032 a(n) = Product_{d|n, dA019565(A291759(d)).

1, 1, 1, 2, 1, 2, 1, 4, 1, 2, 1, 24, 1, 6, 1, 8, 1, 12, 1, 8, 3, 6, 1, 480, 1, 2, 1, 72, 1, 120, 1, 16, 3, 2, 3, 480, 1, 2, 1, 32, 1, 216, 1, 120, 5, 6, 1, 13440, 3, 60, 1, 120, 1, 168, 3, 1440, 1, 6, 1, 144000, 1, 10, 3, 32, 1, 1080, 1, 8, 3, 72, 1, 26880, 1, 10, 75, 24, 9, 1080, 1, 128, 7, 10, 1, 86400, 1, 30, 3

Offset: 1

Antti Karttunen, Jan 29 2022

nonn

Index entries for sequences computed from indices in prime factorization

Cf. A019565, A048673, A289814, A291759, A351030, A351031, A351034 (rgs-transform).

Cf. also A293222.

A019565(n) = { my(m=1, p=1); while(n>0, p = nextprime(1+p); if(n%2, m *= p); n >>= 1); (m); };
A048673(n) = { my(f = factor(n)); for (i=1, #f~, f[i, 1] = nextprime(f[i, 1]+1)); (1+factorback(f))/2; };
A289814(n) = { my(d=digits(n, 3)); fromdigits(vector(#d, i, if (d[i]==2, 1, 0)), 2); } \\ From A289814
A291759(n) = A289814(A048673(n));
A351032(n) = { my(m=1); fordiv(n,d,if(dA019565(A291759(d)))); (m); };

A351082 a(n) = Product_{d|n} A019565(A289814(d)); a product obtained from the 2-digits present in ternary expansions of the divisors of n.

Original entry on oeis.org

1, 2, 1, 2, 2, 6, 3, 12, 1, 4, 2, 6, 1, 12, 6, 36, 6, 30, 5, 40, 15, 20, 10, 540, 30, 60, 1, 12, 2, 36, 1, 72, 6, 36, 36, 30, 1, 20, 1, 240, 2, 540, 3, 120, 30, 100, 10, 8100, 15, 600, 90, 900, 30, 210, 28, 1008, 35, 28, 14, 7560, 21, 84, 105, 504, 28, 1260, 7, 504, 210, 3024, 42, 94500, 35, 140, 3150, 700, 420, 18900

Offset: 1

Antti Karttunen, Jan 31 2022

Cf. A019565, A289814, A293221, A351081, A351092.

A019565(n) = { my(m=1, p=1); while(n>0, p = nextprime(1+p); if(n%2, m *= p); n >>= 1); (m); };
A289814(n) = { my(d=digits(n, 3)); fromdigits(vector(#d, i, if (d[i]==2, 1, 0)), 2); };
A351082(n) = { my(m=1); fordiv(n,d,m *= A019565(A289814(d))); (m); };

a(n) = A019565(A289814(n)) * A293222(n).

cp's OEIS Frontend

A351032 a(n) = Product_{d|n, dA019565(A291759(d)).

Views

Author

Keywords

Links

Crossrefs

Programs

PARI