OFFSET
1,1
COMMENTS
From Robert Israel, Aug 08 2018: (Start)
The concatenation of two terms is a term.
If a*10^m + b is a term, where b < (2/9)*10^m, then a*10^k+b is a term for all k > m. (End)
LINKS
Robert Israel, Table of n, a(n) for n = 1..2000
MAPLE
f:= proc(n) local L, M;
L:= convert(n, base, 5);
M:= convert(2*n, base, 5);
if sort(L) = sort(M) then add(L[i]*10^(i-1), i=1..nops(L)) else NULL fi
end proc:
map(f, [$1..10000]); # Robert Israel, Aug 08 2018
CROSSREFS
KEYWORD
nonn,base
AUTHOR
STATUS
approved