cp's OEIS Frontend

A319483 a(n) = A128921(n)^2.

%I A319483 #25 Jun 23 2022 19:32:49
%S A319483 0,1,4,9,121,484,1089,9801,10201,12321,14641,40804,44944,1002001,
%T A319483 1234321,4008004,100020001,102030201,104060401,121242121,123454321,
%U A319483 125686521,400080004,404090404,10000200001,10221412201,12102420121,12345654321,40000800004,1000002000001
%N A319483 a(n) = A128921(n)^2.
%e A319483 b(n) = reverse of a(n).
%e A319483 n | A128921(n) |   a(n) |   b(n) | Root of b(n) |
%e A319483 --+------------+--------+--------+--------------+
%e A319483 1 |         0  |     0  |     0  |           0  |
%e A319483 2 |         1  |     1  |     1  |           1  |
%e A319483 3 |         2  |     4  |     4  |           2  |
%e A319483 4 |         3  |     9  |     9  |           3  |
%e A319483 5 |        11  |   121  |   121  |          11  |
%e A319483 6 |        22  |   484  |   484  |          22  |
%e A319483 7 |        33  |  1089  |  9801  |          99  |
%e A319483 8 |        99  |  9801  |  1089  |          33  |
%e A319483 9 |       101  | 10201  | 10201  |         101  |
%o A319483 (Python)
%o A319483 from itertools import count, chain, islice
%o A319483 from sympy.ntheory.primetest import is_square
%o A319483 def A319483_gen(): # generator of terms
%o A319483     return filter(lambda n:is_square(int(str(n)[::-1])),map(lambda n: n**2, chain((0,),chain.from_iterable(chain((int((s:=str(d))+s[-2::-1]) for d in range(10**l,10**(l+1))), (int((s:=str(d))+s[::-1]) for d in range(10**l,10**(l+1)))) for l in count(0)))))
%o A319483 A319483_list = list(islice(A319483_gen(),20)) # _Chai Wah Wu_, Jun 23 2022
%Y A319483 Cf. A002113, A128921, A319482.
%K A319483 nonn,base
%O A319483 1,3
%A A319483 _Seiichi Manyama_, Sep 20 2018