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.

Showing 1-4 of 4 results.

A340164 Rotationally ambigrammatic square numbers with no trailing zeros.

Original entry on oeis.org

0, 1, 9, 16, 81, 169, 196, 961, 1089, 1681, 6889, 9801, 10609, 10816, 11881, 19881, 61009, 69169, 69696, 80089, 90601, 91809, 110889, 160801, 190096, 190969, 198916, 199809, 609961, 660969, 698896, 811801, 896809, 900601, 910116, 919681, 998001, 1006009
Offset: 1

Views

Author

Philip Mizzi, Dec 30 2020

Keywords

Comments

A rotationally ambigrammatic number (A045574) is one that can be rotated by 180 degrees resulting in a readable, most often new number. Such numbers, by definition, can only contain the digits 0, 1, 6, 8, 9.
If the number once rotated happens to be the same number (e.g., 6889) it is a strobogrammatic number. Those present here are the terms of A018848.
Numbers such as 100, which is a square with trailing zeros, have been excluded. Such numbers rotated by 180 degrees would be written with leading zeros. Typically this is not the way we write numbers.
This sequence is infinite as it contains (10^k + 3)^2 and (3*10^k + 1)^2 for any k >= 0 (note also that A004086((10^k + 3)^2) = (3*10^k + 1)^2 when k > 0). - Rémy Sigrist, Dec 30 2020

Crossrefs

Intersection of A045574 and A000290.
Cf. A004086, A339996 (square roots).

Programs

  • Mathematica
    Select[Range[0, 1000], (# == 0 || ! Divisible[#, 10]) && AllTrue[IntegerDigits[#^2], MemberQ[{0, 1, 6, 8, 9}, #1] &] &]^2 (* Amiram Eldar, Dec 30 2020 *)
  • PARI
    isra(n) = (n%10) && (!setminus(Set(Vec(Str(n))), Vec("01689"))) || !n; \\ A045574
    isok(n) = issquare(n) && isra(n); \\ Michel Marcus, Dec 30 2020

Formula

a(n) = A339996(n)^2.

A105268 Primes which are 1 + strobogrammatic numbers A000787(n): the same upside down.

Original entry on oeis.org

2, 89, 97, 809, 907, 8009, 8699, 9697, 9887, 81119, 98887, 8000009, 9888887, 81111119, 8111111119, 8666699999, 9888888887, 8000000000009, 9888888888887, 98888888888888887, 81111111111111111119, 800000000000000000009
Offset: 1

Views

Author

Jonathan Vos Post, Apr 16 2005

Keywords

Comments

Primes which, upon subtracting one, give numbers which read the same upside-down. Not to be confused with strobogrammatic primes A007597 such as 181 or 619. Also, 263 is the largest known prime whose square is strobogrammatic. Not to be confused with strobogrammatic squares A018848 such as 109181601. After a(7) this sequence is exemplary, not complete (i.e. missing some values).

Examples

			9887 is prime, 9887 = 9886+1 and 9886 turned upside-down is 9886 again.
		

Crossrefs

Formula

{A000787(n)+1} intersect {A000040}.

Extensions

Term a(17) reordered by Georg Fischer, Mar 20 2022

A287092 Strobogrammatic nonpalindromic numbers.

Original entry on oeis.org

69, 96, 609, 619, 689, 906, 916, 986, 1691, 1961, 6009, 6119, 6699, 6889, 6969, 8698, 8968, 9006, 9116, 9696, 9886, 9966, 16091, 16191, 16891, 19061, 19161, 19861, 60009, 60109, 60809, 61019, 61119, 61819, 66099, 66199, 66899, 68089, 68189, 68889, 69069, 69169, 69869, 86098, 86198, 86898, 89068, 89168
Offset: 1

Views

Author

Ilya Gutkovskiy, May 19 2017

Keywords

Comments

Nonpalindromic numbers which are invariant under a 180-degree rotation.
Numbers that are the same upside down and containing digits 6, 9.
Intersection of A000787 and A029742.
Union of this sequence and A006072 gives A000787.

Crossrefs

Programs

  • Mathematica
    fQ[n_] := Block[{s = {0, 1, 6, 8, 9}, id = IntegerDigits[n]}, If[ Union[ Join[s, id]] == s && (id /. {6 -> 9, 9 -> 6}) == Reverse[id], True, False]]; Select[ Range[0, 89168], fQ[ # ] && ! PalindromeQ[ # ] &]

A340054 Prime numbers which can be expressed as the sum of two numbers, one of which is the rotationally ambigrammatic transformation of the other excluding leading zeros.

Original entry on oeis.org

2, 107, 157, 929, 1069, 1567, 10007, 10079, 11657, 11927, 14897, 15667, 15937, 91019, 93529, 93629, 99689, 100207, 100279, 100669, 100699, 104179, 105359, 106297, 106759, 108287, 108649, 108707, 109097, 109267, 109297, 110567, 110597, 111577, 114377, 115777
Offset: 1

Views

Author

Philip Mizzi, Dec 27 2020

Keywords

Examples

			Consider the number 16. Applying a rotationally ambigrammatic transformation gives the number 91. 16 + 91 = 107. A prime. Hence 107 is part of the sequence.
Consider the number 18. Applying a rotationally ambigrammatic transformation gives the number 81. 18 + 81 = 99. Not a prime. Hence 99 is not part of the sequence.
		

Crossrefs

Cf. A045574 (rotationally ambigrammatic numbers), A018848.
Showing 1-4 of 4 results.