A325525 Difference sequence of A325432.

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

Offset

1,2

Comments

See A325417 for a guide to related sequences.

Conjecture: every term is in {1,2,3,4,5,6,7,9}; note that 8 is missing.

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) = 20/7. - Amiram Eldar, Nov 26 2020

Mathematica

a = {1}; Do[AppendTo[a, NestWhile[# + 1 &, Last[a] + 1, Apply[Or,
Map[MemberQ[a, #] &, Select[Flatten[{#/3, #/4}],
IntegerQ]]] &]], {20000}]; a;         (* A315431 *)
c = Complement[Range[Last[a]], a] ;   (* A325432 *)
Differences[a]  (* A325524 *)
Differences[c]  (* A325525 *)
(* Peter J. C. Moses, Apr 23 2019 *)

Crossrefs

Cf. A325417, A325432, A325524.

Sequence in context: A116077 A074144 A239383 * A309554 A011146 A241370

Adjacent sequences: A325522 A325523 A325524 * A325526 A325527 A325528

Keyword

nonn,easy

Author

Clark Kimberling, May 06 2019

Status

approved