login
A363835
Numbers that are the concatenation of a square and a cube, and also the concatenation of a cube and a square.
1
10, 11, 164, 640, 641, 1441, 1729, 1961, 6464, 7290, 7291, 14096, 40960, 40961, 64729, 72964, 115625, 116641, 125441, 146656, 148841, 156250, 156251, 409664, 466560, 466561, 644096, 729729, 1117649, 1166464, 1176490, 1176491, 1262144, 1531441, 1562564, 1795664, 2621440, 2621441, 4096729, 4665664
OFFSET
1,1
COMMENTS
Includes 10*x^6 and 10*x^6 + 1 for all x >= 1.
LINKS
EXAMPLE
a(6) = 1441 is the concatenation of 1^3 and 21^2 and also the concatenation of 12^2 and 1^3.
MAPLE
N:= 7: # for terms of up to N digits
for d from 1 to N-1 do
S[d]:= {seq(i^2, i=ceil(10^((d-1)/2)) .. floor((10^d-1)^(1/2)))}:
C[d]:= {seq(i^3, i=ceil(10^((d-1)/3)) .. floor((10^d-1)^(1/3)))}:
od:
SC:= {seq(seq(seq(seq(10^i*s+c, s=S[j]), c=C[i]), j=1..N-i), i=1..N-1), seq(seq(10*s, s=S[i]), i=1..N-1)}:
CS:= {seq(seq(seq(seq(10^i*c+s, c=C[j]), s=S[i]), j=1..N-i), i=1..N-1), seq(seq(10*c, c=C[i]), i=1..N-1)}:
sort(convert(SC intersect CS, list));
CROSSREFS
Sequence in context: A222473 A361990 A335801 * A041217 A041218 A300458
KEYWORD
nonn,base
AUTHOR
Robert Israel, Oct 19 2023
STATUS
approved