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

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

Offset: 1

Author

Amiram Eldar, May 21 2024

Keywords

• nonn
• more

Comments

Numbers k such that k | A000213(k).

Examples

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

Crossrefs

Cf. A000213.

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

Programs

Mathematica

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

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);}