|
%I #14 Oct 27 2019 15:44:25
%S 11,48,927,1664,25125,36216,49343,64512,81729,1001000,1211331,1441728,
%T 1692197,1962744,2253375,2564096,2894913,3245832,3616859,4008000,
%U 4419261,48410648,52912167,57613824,62515625,67617576,72919683,78421952,84124389,90027000
%N Concatenation of n^2 and n^3.
%C a(n) is divisible by n^2.
%H Vincenzo Librandi, <a href="/A239460/b239460.txt">Table of n, a(n) for n = 1..1000</a>
%e a(9) = 81729 because 81 = 9^2 and 729 = 9^3.
%t Table[ToExpression[ToString[n^2]<>ToString[n^3]],{n,1,30}] (* _Vaclav Kotesovec_, Mar 24 2014 *)
%t Table[FromDigits[Join[Flatten[IntegerDigits[{n^2,n^3}]]]],{n,30}] (* _Harvey P. Dale_, Oct 27 2019 *)
%o (PARI) vector(100, n, eval(Str(n^2, n^3)))
%Y Cf. A053061, A055436, A061086, A061087, A239459, A239461, A239462, A239463, A239464.
%K nonn,base
%O 1,1
%A _Colin Barker_, Mar 19 2014
|
