OFFSET
1,1
COMMENTS
a(14) >= 10^8. - Martin Ehrenstein, Jan 31 2022
LINKS
C. Rivera, Puzzle 1074 Semiprimes stairs, The prime puzzles and problems connection, Feb. 2022
EXAMPLE
a(1) = 4 which is a semiprime (note 2*2 = 2+2, which is why the word "distinct" is in the Name).
a(3) = 14 = 2*7 -> 9 (semiprime) = 3*3 -> 3+3 = 6 (semiprime) = 2*3 -> 2+3 = 5 (not semiprime).
MAPLE
f:= proc(n) local L, a, b; option remember;
L:= ifactors(n)[2];
if nops(L) = 1 and L[1][2] = 2 then
1 + procname(2*L[1][1])
elif nops(L) = 2 and L[1][2]+L[2][2]=2 then
1 + procname(L[1][1]+L[2][1])
else 0
fi
end proc:
f(4):= 1:
V:= map(f, [$1..10^6]):
W:= Vector(11):
for nn from 1 to 10^6 do
if V[nn] > 0 and W[V[nn]] = 0 then W[V[nn]]:= nn fi
od:
convert(W, list);
CROSSREFS
KEYWORD
nonn,more
AUTHOR
J. M. Bergot and Robert Israel, Jan 27 2022
EXTENSIONS
a(13) from Martin Ehrenstein, Jan 31 2022
STATUS
approved
