The On-Line Encyclopedia of Integer Sequences (OEIS)

Revision History for A082299 (Bold, blue-underlined text is an addition; faded, red-underlined text is a ~~deletion~~.)
Showing entries 1-10 | older changes

A082299

Greatest common divisor of n and its sum of prime factors (with repetition).
(history; published version)

#15 by OEIS Server at Mon Feb 01 19:40:22 EST 2021

LINKS

Antti Karttunen, <a href="/A082299/b082299_1.txt">Table of n, a(n) for n = 1..20000</a> (first 1000 terms from Harvey P. Dale)

#14 by Susanna Cuyler at Mon Feb 01 19:40:22 EST 2021

STATUS

proposed

approved

Discussion

Mon Feb 01

19:40

OEIS Server: Installed new b-file as b082299.txt.  Old b-file is now b082299_1.txt.

#13 by Antti Karttunen at Mon Feb 01 15:50:43 EST 2021

STATUS

editing

proposed

#12 by Antti Karttunen at Mon Feb 01 15:27:23 EST 2021

CROSSREFS

Cf. A001414, A082300, (positions of ones), A082343, A082344.

#11 by Antti Karttunen at Mon Feb 01 15:25:57 EST 2021

FORMULA

a(n) = n / A082344(n) = A001414(n) / A082343(n). - Antti Karttunen, Feb 01 2021

#10 by Antti Karttunen at Mon Feb 01 15:23:54 EST 2021

PROG

(PARI)

A001414(n) = ((n=factor(n))[, 1]~*n[, 2]); \\ From A001414.

A082299(n) = gcd(n, A001414(n)); \\ Antti Karttunen, Feb 01 2021

#9 by Antti Karttunen at Mon Feb 01 15:23:04 EST 2021

COMMENTS

a(n) = GCD(n, A001414(n));

LINKS

Harvey P. Dale, Antti Karttunen, <a href="/A082299/b082299_1.txt">Table of n, a(n) for n = 1..20000</a> (first 1000</a> terms from Harvey P. Dale)

FORMULA

a(n) = gcd(n, A001414(n)). - _Antti Karttunen_, Feb 01 2021

#8 by Antti Karttunen at Mon Feb 01 15:18:55 EST 2021

FORMULA

a(n) = gcd(n, A001414(n)). - Antti Karttunen, Feb 01 2021

EXAMPLE

a(100) = GCD(2*2*5*5,2+2+5+5) = GCD(2*2*5,2*7) = 2;

a(200) = GCD(2*2*2*5*5,2+2+2+5+5) = GCD(2*2*2*5,2*2*2*2) = 8.

CROSSREFS

Cf. A001414, A082300, A082343, A082344.

Cf. also A099635, A099636.

STATUS

approved

editing

#7 by Harvey P. Dale at Sun Dec 27 19:13:38 EST 2015

STATUS

editing

approved

#6 by Harvey P. Dale at Sun Dec 27 19:13:33 EST 2015

LINKS

Harvey P. Dale, <a href="/A082299/b082299.txt">Table of n, a(n) for n = 1..1000</a>

MATHEMATICA

Table[GCD[Total[Times@@@FactorInteger[n]], n], {n, 100}] (* Harvey P. Dale, Dec 27 2015 *)

STATUS

approved

editing