OFFSET
1,1
COMMENTS
Squarefree terms of A380888.
All terms > 2 are odd.
EXAMPLE
1365 is a term because 1365 = 3 * 5 * 7 * 13 and 1/(3-1) + 1/(5-1) + 1/(7-1) + 1/(13-1) = 1/2 + 1/4 + 1/6 + 1/12 = 1.
MAPLE
filter:= proc(n) local F, t;
F:=ifactors(n)[2];
if F[.., 2] <> [1$nops(F)] then return false fi;
add(1/(t-1), t=F[.., 1]) = 1
end proc:
select(filter, [2, seq(i, i=1..10^8, 2)]);
CROSSREFS
KEYWORD
nonn
AUTHOR
Robert Israel, Apr 23 2025
EXTENSIONS
More terms from Giorgos Kalogeropoulos, Apr 27 2025
STATUS
approved
