login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A081746 a(1)=1; for n>1, a(n)=a(n-1)-3 if n is already in the sequence, a(n)=a(n-1)+5 otherwise. 3
1, 6, 11, 16, 21, 18, 23, 28, 33, 38, 35, 40, 45, 50, 55, 52, 57, 54, 59, 64, 61, 66, 63, 68, 73, 78, 83, 80, 85, 90, 95, 100, 97, 102, 99, 104, 109, 106, 111, 108, 113, 118, 123, 128, 125, 130, 135, 140, 145, 142, 147, 144, 149, 146, 143, 148, 145, 150 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,2

LINKS

Peter Munn, Table of n, a(n) for n = 1..5000

B. Cloitre, N. J. A. Sloane and M. J. Vandermast, Numerical analogues of Aronson's sequence, J. Integer Seqs., Vol. 6 (2003), #03.2.2.

B. Cloitre, N. J. A. Sloane and M. J. Vandermast, Numerical analogues of Aronson's sequence, arXiv:math/0305308 [math.NT], 2003.

FORMULA

a(n) - n is periodic with period 648.

MATHEMATICA

a[n_] := a[n] = If[n == 1, 1, If[MemberQ[Array[a, n-1], n], a[n-1] - 3, a[n-1] + 5]]; Array[a, 58] (* Jean-Fran├žois Alcover, Oct 05 2018 *)

CROSSREFS

Cf. A081747, A081748, A080578, A080900, A080901, A080939.

Sequence in context: A315456 A070397 A080904 * A080900 A080783 A315457

Adjacent sequences:  A081743 A081744 A081745 * A081747 A081748 A081749

KEYWORD

nonn,look,hear

AUTHOR

Benoit Cloitre, Apr 05 2003

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 8 11:20 EST 2021. Contains 341948 sequences. (Running on oeis4.)