OFFSET
1,1
COMMENTS
Also numbers k such that k concatenated with k+4 gives the product of two numbers which differ by 1.
If k+2 has d digits, the concatenation is k//k+2 = 10^d*k+k+2 = m*(m+3), therefore 10^d*k+k-8 = (m-2)*(m+5), so there is a large overlap with A116107. - R. J. Mathar, May 22 2026
LINKS
Robert Israel, Table of n, a(n) for n = 1..36
EXAMPLE
63716866//63716868 = 79822844 * 79822847, where // denotes concatenation.
63716866//63716870 = 79822845 * 79822846.
MAPLE
As:= {}: count:= 0:
for m from 2 to 50 do
acands:= map(t -> rhs(op(t)), [msolve(a*(a+1)=4, 10^m+1)]);
bcands:= map(t -> t*(t+1) mod 10^m, acands);
good:= select(t -> bcands[t]>=10^(m-1), [$1..nops(acands)]);
As:= As union convert(bcands[good], set);
od:
map(t -> t-4, sort(convert(As, list))); # Robert Israel, Mar 18 2026
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Giovanni Resta, Feb 06 2006
EXTENSIONS
Edited by N. J. A. Sloane, Apr 13 2007
More terms from Robert Israel, Mar 18 2026
STATUS
approved
