cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

Showing 1-2 of 2 results.

A093396 Denominators of n divided by the product of the anti-divisors of n.

Original entry on oeis.org

2, 3, 6, 2, 30, 15, 4, 42, 42, 10, 270, 54, 8, 33, 2310, 280, 78, 78, 8, 4050, 4050, 14, 1428, 102, 440, 6270, 114, 32, 7938, 257985, 520, 138, 552, 16, 11250, 866250, 616, 1458, 1458, 2720, 14790, 174, 131040, 16926, 17670, 190, 39204, 78408, 8, 2315250
Offset: 3

Views

Author

Lior Manor, Mar 28 2004

Keywords

Comments

See A066272 for definition of anti-divisor.

Examples

			The anti-divisors of 18 are 4, 5, 7, 12. Hence a(18) = 4*5*7*12/GCD(4*5*7*12, 18) = 280.
		

Crossrefs

Cf. A066417, A091507, A093394, A093395 (numerators).

Programs

  • Python
    import numpy as np
    from sympy.ntheory.factor_ import antidivisors
    def a093396(k):
            return (m:=np.prod(antidivisors(k), dtype=object))//np.gcd(m,k, dtype=object)
    {print(a093396(k), end = ', ') for k in range(3,10**2)} # Dumitru Damian, Oct 16 2023

Formula

a(n) = A091507(n)/GCD(n, A091507(n))

Extensions

Name changed by Franklin T. Adams-Watters, Aug 21 2013

A093395 Numerators of n divided by the product of the anti-divisors of n.

Original entry on oeis.org

3, 4, 5, 3, 7, 8, 3, 5, 11, 3, 13, 7, 1, 16, 17, 3, 19, 5, 1, 11, 23, 3, 5, 13, 1, 7, 29, 1, 31, 32, 1, 17, 1, 3, 37, 19, 1, 5, 41, 1, 43, 11, 1, 23, 47, 3, 7, 5, 1, 13, 53, 1, 1, 7, 1, 29, 59, 1, 61, 31, 1, 64, 1, 1, 67, 17, 1, 1, 71, 3, 73, 37, 1, 19
Offset: 3

Views

Author

Lior Manor, Mar 28 2004

Keywords

Comments

See A066272 for definition of anti-divisor.

Examples

			The anti-divisors of 18 are 4, 5, 7, 12. Hence a(18) = 18/GCD(4*5*7*12, 18) = 3.
		

Crossrefs

Cf. A066417, A091507, A093394, A093396 (denominators).

Formula

a(n) = n/GCD(n, A091507(n)) = n/A093394(n)

Extensions

Name changed by Franklin T. Adams-Watters, Aug 21 2013
Showing 1-2 of 2 results.