A255134 First differences of A097764.

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,1

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).

Links

Reinhard Zumkeller, Table of n, a(n) for n = 1..10000

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

Prog

(Haskell)
a255134 n = a255134_list !! (n-1)
a255134_list = zipWith (-) (tail a097764_list) a097764_list

Crossrefs

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

Sequence in context: A087868 A233513 A175042 * A109065 A022968 A023454

Adjacent sequences: A255131 A255132 A255133 * A255135 A255136 A255137

Keyword

nonn

Author

Reinhard Zumkeller, Feb 14 2015

Status

approved