A255507 - OEIS

A255507

First differences of A255437.

1, 1, -2, 2, 2, 1, 1, 1, -7, 2, 2, 5, 1, 1, 1, 1, 1, -14, 2, 2, 2, 10, 1, 1, 1, 1, 1, 1, 1, -23, 2, 2, 2, 2, 17, 1, 1, 1, 1, 1, 1, 1, 1, 1, -34, 2, 2, 2, 2, 2, 26, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, -47, 2, 2, 2, 2, 2, 2, 37, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,3

LINKS

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

MATHEMATICA

Differences[Flatten[Table[If[IntegerQ[#], Range[1, 2*#, 2], m] & [Sqrt[m]], {m, 64}]]] (* Paolo Xausa, May 02 2026 *)

PROG

(Haskell)

a255507 n = a255507_list !! (n-1)

a255507_list = zipWith (-) (tail a255437_list) a255437_list

CROSSREFS