|
|
A373055
|
|
Numbers k that divide the k-th term of the tribonacci sequence A000213.
|
|
0
|
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
Numbers k such that k | A000213(k).
|
|
LINKS
|
|
|
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
|
|
|
KEYWORD
|
nonn,more
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|