|
Search: id:A066702
|
|
|
| A066702 |
|
Square numbers whose reverse is triangular. |
|
+0
1
|
|
| 0, 1, 1306449, 1044000721, 12957041241, 1019072079081, 1174279984164, 6454272356676, 65036563475625, 67624587155889
(list; graph; listen)
|
|
|
OFFSET
|
0,3
|
|
|
EXAMPLE
|
9446031 is triangular and 1306449 is a square.
|
|
MATHEMATICA
|
dtn[L_] := Fold[10#1+#2&, 0, L] A={}; For[i=1, i>0, i++, t=i(i-1)/2; r=dtn[Reverse[IntegerDigits[t]]]; If[IntegerQ[Sqrt[r]]&&Mod[t, 10]>0, AppendTo[A, r]; Print[A]]]
|
|
CROSSREFS
|
Sequence in context: A053082 A053081 A053084 this_sequence A141592 A116495 A023047
Adjacent sequences: A066699 A066700 A066701 this_sequence A066703 A066704 A066705
|
|
KEYWORD
|
base,more,nonn
|
|
AUTHOR
|
Erich Friedman (efriedma(AT)stetson.edu), Jan 14 2002
|
|
|
Search completed in 0.002 seconds
|
