|
|
A018849
|
|
Strobogrammatic squares: the same upside down (calculator-style numerals).
|
|
2
|
|
|
0, 1, 121, 6889, 10201, 69169, 1002001, 5221225, 100020001, 109181601, 522808225, 602555209, 10000200001, 62188888129, 1000002000001, 1212225222121, 100000020000001, 10000000200000001, 10022212521222001, 12102202520220121
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,3
|
|
COMMENTS
|
Subsequence of squares in A018846. - Michel Marcus, Aug 04 2014
|
|
LINKS
|
Table of n, a(n) for n=1..20.
|
|
PROG
|
(PARI) is_A018846(n, t=Vec("012..59.86"))={ apply(x->t[eval(x)+1], n=Vec(Str(n)))==vecextract(n, "-1..1"); }
lista(nn) = {for(n=0, nn, if (is_A018846(n^2), print1(n^2, ", "))); } \\ Michel Marcus, Aug 04 2014
|
|
CROSSREFS
|
Sequence in context: A231649 A212802 A272775 * A011814 A238320 A144766
Adjacent sequences: A018846 A018847 A018848 * A018850 A018851 A018852
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
David W. Wilson
|
|
STATUS
|
approved
|
|
|
|