login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A058012
Consider the sequence {b(m)} of composite numbers (excluding 1); sequence gives values of b(m) where gcd(m, b(m)) increases.
1
4, 6, 10, 12, 14, 36, 39, 42, 45, 48, 124, 128, 132, 140, 345, 365, 370, 375, 380, 385, 390, 1086, 1140, 3101, 3122, 8416, 8480, 24309, 24318, 64550, 64560, 64570, 64590, 64600, 64660, 64730, 175208, 175219, 175230, 176616, 480876, 480888, 480948
OFFSET
1,1
EXAMPLE
a(4) = 12 because twelve is the sixth composite number and gcd(6,12) > gcd(5,10).
MATHEMATICA
r=0; Do[a = GCD[n, n - PrimePi[n] -1]; If[a > r, r = a; Print[n]], {n, 1, 10^6} ]
CROSSREFS
Cf. A058011.
Sequence in context: A036438 A338519 A066190 * A026411 A020189 A166986
KEYWORD
nonn
AUTHOR
Robert G. Wilson v, Nov 13 2000
EXTENSIONS
Title corrected by Sean A. Irvine, Jul 17 2022
STATUS
approved