A373055 Numbers k that divide the k-th term of the tribonacci sequence A000213.

1, 3, 217, 13343, 549333, 1387663, 9356863, 22119541

Offset

1,2

Comments

Numbers k such that k | A000213(k).

Links

Table of n, a(n) for n=1..8.

Example

3 is a term since A000213(3) = 3 is divisible by 3.

Mathematica

With[{m = 15000}, Position[LinearRecurrence[{1, 1, 1}, {1, 1, 3}, m]/Range[m], _?IntegerQ] // Flatten]

Prog

(PARI) lista(kmax) = {my(t0 = 1, t1 = 1, t2 = 1, t3); print1("1, "); for(k = 3, kmax, t3 = t0 + t1 + t2; if(!(t3 % k), print1(k, ", ")); t0 = t1; t1 = t2; t2 = t3); }

Crossrefs

Cf. A000213.

Similar sequences: A014847 (Catalan), A016089 (Lucas), A023172 (Fibonacci), A051177 (partition), A232570 (tribonacci A000073), A246692 (Pell), A266969 (Motzkin).

Sequence in context: A342234 A225239 A225362 * A063836 A172811 A247070

Adjacent sequences: A373052 A373053 A373054 * A373056 A373057 A373058

Keyword

nonn,more

Author

Amiram Eldar, May 21 2024

Status

approved