|
%I #17 May 22 2022 09:39:28
%S 0,1,2,3,1,11,21,31,2,12,22,26,3,13,99,33,1,101,201,301,11,111,211,
%T 311,21,121,221,31,2,102,202,12,112,212,22,122,26,264,3,103,307,13,
%U 113,99,836,33,1,1001,2001,3001,101,1101,2101,3101,201,1201,2201,301,1301,11,1011
%N a(n) = square root of digital reversal of A102859(n)^2.
%C The sequence is inverse to A102859.
%H <a href="/index/Sq#sqrev">Index entry for sequences related to reversing digits of squares</a>
%t r[n_] := FromDigits@ Reverse@ IntegerDigits@ n; Sqrt@ r[#^2] & /@ Select[Range[0, 1101], IntegerQ@ Sqrt@ r[#^2] &] (* _Michael De Vlieger_, Sep 21 2015 *)
%Y Cf. A102859.
%K nonn,base
%O 1,3
%A _Zak Seidov_, Mar 03 2005
%E 0 inserted, and name replaced with formula, by _Jon E. Schoenfield_, Sep 20 2015
|
