A325499 Difference sequence of A325424.

1, 5, 2, 2, 2, 1, 3, 3, 1, 4, 1, 5, 1, 1, 4, 1, 1, 6, 2, 2, 1, 5, 1, 1, 2, 2, 7, 1, 2, 2, 1, 7, 2, 2, 1, 1, 2, 3, 1, 4, 6, 1, 1, 2, 2, 1, 7, 4, 1, 3, 2, 1, 1, 2, 2, 1, 1, 5, 1, 4, 1, 5, 2, 2, 2, 1, 1, 2, 3, 1, 4, 7, 1, 4, 1, 1, 5, 1, 2, 2, 1, 3, 2, 1, 1, 2

Offset

1,2

Comments

See A325417 for a guide to related sequences.

Conjecture: every term is in {1,2,3,4,5,6,7}.

Links

Clark Kimberling, Table of n, a(n) for n = 1..10000

Formula

Asymptotic mean: lim_{n->oo} (1/n) * Sum_{k=1..n} a(k) = 12/5. - Amiram Eldar, Nov 26 2020

Mathematica

a = {1}; Do[AppendTo[a, NestWhile[# + 1 &, Last[a] + 1,
Apply[Or, Map[MemberQ[a, #] &, Select[Flatten[{#/3, #/2}],
IntegerQ]]] &]], {2000}]; a ;       (* A036668 *)
c = Complement[Range[Last[a]], a] ; (* A325424 *)
Differences[a]  (* A325498 *)
Differences[c]  (* A325499 *)
(* Peter J. C. Moses, Apr 23 2019 *)

Crossrefs

Cf. A325424, A325417, A036668, A325498.

Sequence in context: A058841 A129165 A190288 * A081119 A303579 A306966

Adjacent sequences: A325496 A325497 A325498 * A325500 A325501 A325502

Keyword

nonn,easy

Author

Clark Kimberling, May 05 2019

Status

approved