A243700 The lexicographically earliest sequence of distinct terms with a(1) = 1 such that a(n) divides the sum of the first a(n) terms.
1, 3, 2, 5, 9, 7, 8, 13, 15, 11, 14, 16, 26, 24, 41, 29, 18, 28, 20, 30, 22, 32, 25, 33, 43, 45, 31, 37, 50, 52, 54, 56, 58, 35, 87, 38, 55, 67, 40, 60, 72, 44, 63, 77, 79, 47, 70, 49, 121, 88, 53, 129, 94, 96, 98, 100, 59, 89, 105, 107, 62, 158, 113, 65, 102, 68, 103, 189
Offset: 1
Examples
1 divides the sum of the first 1 term (yes: 1/1=1) 3 divides the sum of the first 3 terms (yes: 6/3=2) 2 divides the sum of the first 2 terms (yes: 4/2=2) 5 divides the sum of the first 5 terms (yes: 20/5=4) 9 divides the sum of the first 9 terms (yes: 63/9=7) 7 divides the sum of the first 7 terms (yes: 35/7=5) 8 divides the sum of the first 8 terms (yes: 48/8=6) ...
Links
- Max Alekseyev, Table of n, a(n) for n = 1..100000 (first 1100 terms from Jean-Marc Falcoz)
- Éric Angelini, a(n) divides the sum of the first a(n) terms of T, posting to the Sequence Fans Mailing List, Jun 11 2014 [Broken link]
- Éric Angelini, a(n) divides the sum of the first a(n) terms of T, posting to the Sequence Fans Mailing List, Jun 11 2014, Cached copy.
- Éric Angelini, Franklin Adams-Watters, Max Alekseyev, A. E. Povolotsky, N. J. A. Sloane, and R. G. Wilson v, a(n) divides the sum of the first a(n) terms of T, Various postings to the old Sequence Fans Mailing List, assembled by _N. J. A. Sloane_, Dec 24 2024
- Hugo Pfoertner, 1.73*10^6 terms, 7z compressed b-file.
Crossrefs
Programs
-
PARI
{ printA243700() = my( S=Set(), T=[], s=0, m=1, k); for(n=1,10^5, k=m; while( ((k==n || setsearch(S,n)) && Mod(s+k,n)) || if(k
Max Alekseyev, Jun 13 2014
Extensions
First 1100 terms were computed by Jean-Marc Falcoz.
Edited by N. J. A. Sloane, Dec 18 2024, adding comments from the lost Sequence Fans Mailing List archive. Deleted an incorrect comment.
Comments