login
A380224
Terms b(k) (for k > 0, and in order of appearance) such that both |b(k) - b(k-1)| and |b(k+1) - b(k)| are greater than 1, where b is A377091.
4
13, 18, 25, 24, -40, -50, -60, -72, -71, -84, -80, 98, 113, 104, 128, 119, 145, 162, 181, -200, -220, -242, -226, -264, -248, -288, -272, -314, -339, 337, 321, -338, 366, 394, 369, 365, 374, -422, 419, 403, 399, 393, 402, 398, 404, 452, 427, -482, 479, 451, 478, -512
OFFSET
1,1
COMMENTS
Terms in A377091 corresponding to the length of runs = 1 in A379880.
FORMULA
a(n) = A377091(A380225(n)).
MATHEMATICA
(* A377091list is defined at A377091 *)
Flatten[Select[Most[Split[A377091list[1000], Abs[#2 - #1] == 1 &]], Length[#] == 1 &]] (* Paolo Xausa, Jan 20 2025 *)
CROSSREFS
Cf. A377091, A379880, A380223, A380225 (corresponding k's).
Sequence in context: A257373 A346561 A131019 * A317771 A037158 A318080
KEYWORD
sign
AUTHOR
Paolo Xausa, Jan 18 2025
STATUS
approved