login
A374950
Sequence starting with 2, where the next term is the lowest new integer which is greater than 1 and coprime with the sum of all previous terms.
0
2, 3, 4, 5, 9, 6, 7, 11, 8, 12, 10, 13, 17, 14, 15, 19, 16, 20, 18, 21, 27, 22, 23, 25, 26, 24, 28, 29, 33, 30, 31, 35, 32, 36, 34, 37, 41, 38, 39, 43, 40, 44, 42, 45, 49, 46, 47, 53, 48, 50, 51, 55, 52, 56, 54, 57, 61, 58, 59, 67, 60, 62, 64, 63, 65, 68, 66
OFFSET
1,1
MATHEMATICA
a={2}; s=2; For[n=2, n<=67, n++, k=2; While[GCD[k, s]!=1||MemberQ[a, k], k++]; s+=k; AppendTo[a, k]]; a (* Stefano Spezia, Jul 25 2024 *)
CROSSREFS
Cf. A084385 (starting with 1).
Sequence in context: A227778 A371265 A166276 * A101544 A171100 A240062
KEYWORD
nonn
AUTHOR
Declan Boushy, Jul 24 2024
EXTENSIONS
More terms from Pontus von Brömssen, Jul 25 2024
STATUS
approved