|
Search: id:A066742
|
|
|
| A066742 |
|
Square numbers whose reverse is pentagonal. |
|
+0 1
|
|
| 0, 1, 529, 1089, 2116, 6241, 103041, 26222944225, 2648772525025, 6262611355441, 62443279235236
(list; graph; listen)
|
|
|
OFFSET
|
0,3
|
|
|
EXAMPLE
|
925 is pentagonal, and 529 is square
|
|
MATHEMATICA
|
dtn[L_] := Fold[10#1+#2&, 0, L] A={0}; For[i=1, i>0, i++, t=i(3i-1)/2; r=dtn[Reverse[IntegerDigits[t]]]; If[IntegerQ[Sqrt[r]]&&Mod[t, 10]>0, AppendTo[A, r]; Print[A]]]
|
|
CROSSREFS
|
Adjacent sequences: A066739 A066740 A066741 this_sequence A066743 A066744 A066745
Sequence in context: A045788 A020289 A082409 this_sequence A067475 A052074 A112079
|
|
KEYWORD
|
base,more,nonn
|
|
AUTHOR
|
Erich Friedman (efriedma(AT)stetson.edu), Jan 16 2002
|
|
|
Search completed in 0.002 seconds
|