cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A321310 List of pairs of numbers with mirror symmetry (calculator-style numerals).

Original entry on oeis.org

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
Offset: 0

Views

Author

Kritsada Moomuang, Nov 03 2018

Keywords

Comments

2 and 5 are taken as mirror images (as on calculator displays).

Examples

			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.
		

Crossrefs

Programs

  • 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 *)