OFFSET
1,1
COMMENTS
From Bernard Schott, Jan 22 2022: (Start)
A299174 is a subsequence because, if k = 2*u, we have s=t=u, s<=t, and u | u*k.
A082663 is another subsequence because, if k = p*q with p < q < 2p, then with s = k-p^2 = p*(q-p) and t = p^2, we have s <= t and p^2 | p*(q-p) * (pq).
It seems that A090196 is the subsequence of odd terms. (End)
gcd(s, t) > 1 where s and t and k > 2 are as in name. - David A. Corneth, Jan 22 2022
Numbers k such that k^2 has at least one divisor d with k/2 <= d < k. - Robert Israel, Jan 08 2025
LINKS
EXAMPLE
15 is in the sequence since 15 = 6+9 where 9 | 6*15 = 90.
MAPLE
filter:= proc(n) nops(select(t -> t >= n/2 and t < n, numtheory:-divisors(n^2)))>=1 end proc:
select(filter, [$1..300]); # Robert Israel, Jan 08 2025
PROG
(PARI) f(n) = sum(s=1, n\2, !((s*n)%(n-s))); \\ A338021
isok(k) = f(k) >= 1; \\ Michel Marcus, Jan 17 2022
CROSSREFS
KEYWORD
nonn
AUTHOR
Wesley Ivan Hurt, Jan 16 2022
STATUS
approved
