proposed
approved
proposed
approved
editing
proposed
editing
proposed
(PARI)
GramMatrix()={my(p=[11, 2, 2, -4, -4, -7, -1, 2, 5, 5, 2, -1, -7, -4, -4, 2, 2]); matrix(#p, #p, i, j, p[(i-j) %#p + 1])}
a(n)={if(n==0, 1, 2*qfrep(GramMatrix(), n, 0)[n])} \\ Andrew Howroyd, Nov 29 2018
proposed
editing
editing
proposed
(PARI) \\ system("wget https://oeis.org/A015165/a015165.txt");
g = matconcat(read("a015165.txt")~);
seq(N, g, flag=0) = concat(1, 2*Vec(qfrep(g, N, flag)));
seq(33, g) \\ Gheorghe Coserea, Nov 28 2018
editing
proposed
More terms from Gheorghe Coserea, Nov 28 2018
proposed
editing