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-2 of 2 results.

A255134 First differences of A097764.

Original entry on oeis.org

12, 11, 9, 28, 36, 44, 52, 20, 40, 68, 76, 84, 92, 100, 53, 55, 116, 124, 132, 140, 148, 156, 128, 36, 172, 180, 188, 196, 204, 212, 209, 11, 228, 11, 225, 244, 252, 260, 268, 276, 284, 292, 300, 56, 252, 316, 324, 332, 340, 348, 356, 364, 372, 380, 45, 343
Offset: 1

Views

Author

Reinhard Zumkeller, Feb 14 2015

Keywords

Comments

a(n) = A097764(n+1) - A097764(n);
conjecture: a(n) > 1; empirically: Min{a(n): 1 <= n <= 10^7} = 9;
a(A255137(n)) = A255136(n) and a(m) < A255136(n) for m < A255137(n).

Crossrefs

Cf. A097764, record values and where they occur: A255136, A255137.

Programs

  • Haskell
    a255134 n = a255134_list !! (n-1)
    a255134_list = zipWith (-) (tail a097764_list) a097764_list
  • Mathematica
    nMax = 10000; n = 1; lst = Reap[While[p = Prime[n]; p^p <= nMax, k = 1; While[(k*p)^p <= nMax, Sow[(k*p)^p]; k++]; n++]][[2, 1]]; Union[lst] // Differences (* Jean-François Alcover, Oct 20 2016, after T. D. Noe *)

A255137 Where records occur in A255134.

Original entry on oeis.org

1, 4, 5, 6, 7, 10, 11, 12, 13, 14, 17, 18, 19, 20, 21, 22, 25, 26, 27, 28, 29, 30, 33, 36, 37, 38, 39, 40, 41, 42, 43, 46, 47, 48, 49, 50, 51, 52, 53, 54, 57, 58, 59, 60, 61, 62, 63, 64, 65, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 81, 82, 83, 84, 85, 86
Offset: 1

Views

Author

Reinhard Zumkeller, Feb 15 2015

Keywords

Comments

A255134(a(n)) = A255136(n) and A255134(m) < A255136(n) for m < a(n).

Crossrefs

Programs

  • Haskell
    a255137 n = a255137_list !! (n-1)  -- a255137_list is defined in A255136.
Showing 1-2 of 2 results.