A379068 Absolute value of smallest (in magnitude) missing negative number after A377091(n) has been found.

1, 1, 1, 1, 3, 3, 3, 3, 3, 5, 5, 5, 5, 5, 5, 5, 9, 10, 11, 12, 13, 13, 13, 13, 13, 13, 14, 15, 16, 17, 18, 19, 19, 19, 19, 19, 19, 20, 21, 22, 23, 24, 25, 25, 25, 25, 25, 25, 25, 25, 25, 25, 25, 26, 27, 28, 29, 30, 31, 32, 33, 33, 33, 33, 33, 33, 33, 33, 33, 33, 33, 33, 33, 33, 33, 33, 33, 33, 37, 38, 39, 41, 41, 41, 41, 41, 41, 41, 41, 41, 41, 41, 42, 43, 44, 45

Offset

0,5

Links

N. J. A. Sloane, Table of n, a(n) for n = 0..10000

N. J. A. Sloane, Table of n, A379067(n), A379068(n) for n = 0..999995.

Example

A377091 has offset 0 and begins 0, 1, 2, -2, -1, 3, ... After we have found A377091(2) = 2, the missing negative numbers are -1, -2, -3, ..., so a(2) = |-1| = 1.

Mathematica

(* A377091list is defined at A377091 *)
Module[{s, a}, s[_] := False; Abs[FoldList[(s[#2] = True; a = #; While[s[a], a--]; a) &, -1, Rest[A377091list[100]]]]] (* Paolo Xausa, Feb 15 2025 *)

Crossrefs

Cf. A3477091, A379067.

Sequence in context: A204854 A113215 A380174 * A105591 A130497 A178154

Adjacent sequences: A379065 A379066 A379067 * A379069 A379070 A379071

Keyword

nonn

Author

N. J. A. Sloane, Dec 28 2024

Status

approved