A379796 Length of n-th block of consecutive negative terms in A377091.

2, 2, 8, 6, 6, 8, 8, 10, 10, 15, 23, 14, 16, 16, 18, 18, 20, 20, 22, 22, 24, 50, 26, 28, 28, 29, 31, 5, 26, 32, 2, 33, 34, 4, 32, 37, 37, 4, 34, 3, 35, 2, 40, 42, 42, 44, 89, 2, 46, 45, 2, 46, 2, 50, 50, 55, 102, 2, 53, 56, 56, 58, 58, 60, 60, 124, 64, 64, 66, 66, 68, 68, 70, 70, 144, 74, 74, 76, 76, 78, 78, 83, 159, 82, 168, 86

Offset

1,1

Links

Rémy Sigrist, Table of n, a(n) for n = 1..4999

Rémy Sigrist, C++ program

Formula

a(n) = A379066(n) - A379792(n) + 1.

a(n) = A379882(2*n + 1). - Rémy Sigrist, Jan 19 2025

Mathematica

(* A377091list is defined at A377091 *)
Map[Length, SplitBy[A377091list[10000], Sign][[3 ;; -2 ;; 2]]] (* Paolo Xausa, Feb 05 2025 *)

Prog

(C++) // See Links section.

Crossrefs

Cf. A377091, A379066, A379788, A379789, A379790, A379791, A379792, A379793, A379794, A379795, A379882, A380837.

Sequence in context: A371937 A119999 A061828 * A086535 A344601 A067436

Adjacent sequences: A379793 A379794 A379795 * A379797 A379798 A379799

Keyword

nonn

Author

N. J. A. Sloane, Jan 18 2025

Status

approved