OFFSET
1,1
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
EXAMPLE
a(19)=135 shares the primes 3,3,5 with a(18)=45.
a(20)=162 shares the primes 3,3,3 with a(19)=135.
a(21)=72 shares the primes 2,3,3 with a(20)=162.
MAPLE
N:= 1000: # for terms before the first term > N
Cands:= [$1..7, $9..N]: nC:= N-1:
R:= 8: x:= 8: found:= true:
while found do
found:= false;
for i from 1 to nC do
if numtheory:-bigomega(igcd(x, Cands[i])) >= 3 then
x:= Cands[i];
R:= R, x;
Cands:= subsop(i=NULL, Cands);
nC:= nC-1;
found:= true;
break
fi od;
od:
R; # Robert Israel, Dec 07 2025
CROSSREFS
KEYWORD
nonn
AUTHOR
Enrique Navarrete, Dec 06 2025
STATUS
approved
