OFFSET
1,1
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..422
EXAMPLE
MATHEMATICA
s = {}; k1 = k2 = 1; Do[k3 = ((6*n - 9)*k2 - (n - 3)*k1)/n; If[CompositeQ[n] && Divisible[k3, n], AppendTo[s, n]]; k1 = k2; k2 = k3, {n, 3, 10^5}]; s (* Amiram Eldar, Jun 28 2022 *)
PROG
(PARI) x1 = 1; x2 = 1; for (n = 3, 100000, x = (3*(2*n - 3)*x1 - (n - 3)*x2)/n; if (!isprime(n), if (!(x%n), print(n))); x2 = x1; x1 = x); \\ David Wasserman, Feb 23 2005
CROSSREFS
KEYWORD
nonn
AUTHOR
Benoit Cloitre, Oct 09 2002
EXTENSIONS
More terms from David Wasserman, Feb 23 2005
STATUS
approved