|
|
A321310
|
|
List of pairs of numbers with mirror symmetry (calculator-style numerals).
|
|
0
|
|
|
0, 0, 1, 1, 2, 5, 5, 2, 8, 8, 11, 11, 12, 51, 15, 21, 18, 81, 21, 15, 22, 55, 25, 25, 28, 85, 51, 12, 52, 52, 55, 22, 58, 82, 81, 18, 82, 58, 85, 28, 88, 88, 101, 101, 102, 501, 105, 201, 108, 801, 111, 111, 112, 511, 115, 211, 118, 811, 121, 151, 122, 551
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,5
|
|
COMMENTS
|
2 and 5 are taken as mirror images (as on calculator displays).
|
|
LINKS
|
|
|
EXAMPLE
|
The sequence begins:
0, 0;
1, 1;
2, 5;
5, 2;
8, 8;
11, 11;
12, 51;
15, 21;
18, 81;
21, 15;
22, 55;
25, 25;
28, 85;
...
81 has its reflection as 18 in a mirror.
125 has its reflection as 251 in a mirror.
|
|
MATHEMATICA
|
{0, 0}~Join~Array[If[Mod[#, 10] == 0, Nothing, If[IntegerLength[#1] == Length[#2], {#1, FromDigits@ #2}, Nothing] & @@ {#, Reverse@ IntegerDigits@ # /. {2 -> 5, 3 -> Nothing, 4 -> Nothing, 5 -> 2, 6 -> Nothing, 7 -> Nothing, 9 -> Nothing}}] &, 123] // Flatten (* Michael De Vlieger, Nov 05 2018 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base,tabf
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|