|
|
A287389
|
|
Both k and its reverse are one less than a square.
|
|
2
|
|
|
0, 3, 8, 80, 99, 323, 360, 575, 840, 4224, 5775, 9999, 32760, 36480, 36863, 42024, 84680, 349280, 808200, 829920, 848240, 998000, 999999, 3055503, 3272480, 3426200, 3640463, 3644280, 3682560, 5597955, 8462280, 8803088, 30481440, 32855823, 80622440, 99999999
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
Except for the first term, the first digit of each term is either 3, 4, 5, 8 or 9. - Chai Wah Wu, May 25 2017
|
|
LINKS
|
|
|
EXAMPLE
|
32760 is in the sequence because 32760 = 181^2-1 and its reverse 6723 = 82^2 - 1.
|
|
MAPLE
|
r:= n-> (s-> parse(cat(s[-i]$i=1..length(s))))(""||n):
select(x-> issqr(r(x)+1), [n^2-1$n=1..10000])[]; # Alois P. Heinz, May 24 2017
|
|
MATHEMATICA
|
Select[Range[0, 10^6], Function[n, Times @@ Boole@ Map[IntegerQ@ Sqrt@ # &, {n + 1, FromDigits@ Reverse@ IntegerDigits@ n + 1}] == 1]] (* Michael De Vlieger, May 24 2017 *)
|
|
PROG
|
(PARI) isok(n) = issquare(n+1) && issquare(fromdigits(Vecrev(digits(n)))+1); \\ Michel Marcus, May 24 2017
|
|
CROSSREFS
|
Cf. A124664: both k and its reverse are one more than a square.
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|