|
| |
|
|
A023110
|
|
Squares which remain squares when the last digit is removed.
|
|
27
| |
|
|
0, 1, 4, 9, 16, 49, 169, 256, 361, 1444, 3249, 18496, 64009, 237169, 364816, 519841, 2079364, 4678569, 26666896, 92294449, 341991049, 526060096, 749609641, 2998438564, 6746486769, 38453641216, 133088524969, 493150849009, 758578289296, 1080936581761
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,3
|
|
|
REFERENCES
| R. K. Guy, Neg and Reg, preprint, Jan 2012.
|
|
|
LINKS
| Robert G. Wilson v, Table of n, a(n) for n = 1..40
|
|
|
FORMULA
| Appears to satisfy a(n)=1444a(n-7)+a(n-14)-76*sqrt(a(n-7)*a(n-14)) which would require a(-k) to look like 16, 49, 169, 256, 3249, 1444, 361, 18496, ... for k>0. - Henry Bottomley (se16(AT)btinternet.com), May 08 2001
|
|
|
MATHEMATICA
| fQ[n_] := IntegerQ@ Sqrt@ Quotient[n^2, 10]; Select[ Range@ 1000000, fQ]^2 (* Robert G. Wilson v, Jan 15 2011 *)
|
|
|
PROG
| (PARI) for(n=0, 1e7, issquare(n^2\10) & print1(n^2", "))
|
|
|
CROSSREFS
| Cf. A053784, A031149, A055792, A055793, A055808, A055812, A055851, A055859, A055872.
Sequence in context: A059931 A027382 A164840 * A073723 A161493 A030075
Adjacent sequences: A023107 A023108 A023109 * A023111 A023112 A023113
|
|
|
KEYWORD
| nonn,base
|
|
|
AUTHOR
| David W. Wilson (davidwwilson(AT)comcast.net)
|
| |
|
|
