A379795 Length of n-th block of consecutive positive terms in A377091.

2, 3, 3, 5, 5, 10, 13, 9, 11, 11, 13, 13, 15, 15, 17, 17, 38, 21, 21, 23, 23, 25, 26, 26, 28, 29, 29, 29, 32, 4, 28, 3, 31, 34, 36, 36, 2, 36, 38, 2, 38, 3, 38, 41, 43, 43, 45, 45, 46, 48, 3, 46, 3, 46, 51, 51, 53, 52, 3, 53, 55, 114, 59, 59, 61, 61, 63, 63, 65, 65, 70, 133, 69, 71, 71, 73, 73, 75, 75, 154, 79, 79, 81, 164, 83, 85

Offset

1,1

Links

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

Rémy Sigrist, C++ program

Formula

a(n) = A379790(n) - A379788(n) + 1.

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

Mathematica

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

Prog

(C++) // See Links section.

Crossrefs

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

Sequence in context: A051032 A106530 A273156 * A294487 A212792 A281363

Adjacent sequences: A379792 A379793 A379794 * A379796 A379797 A379798

Keyword

nonn

Author

N. J. A. Sloane, Jan 18 2025

Status

approved