OFFSET
0,2
COMMENTS
For the definition of Q-residue, see A193649.
FORMULA
Conjecture: a(n) = 3*5^n-2*4^n; G.f.: ( 1-2*x ) / ( (5*x-1)*(4*x-1) ). - R. J. Mathar, Feb 19 2015
MATHEMATICA
q[n_, k_] := 1;
r[0] = 1; r[k_] := Sum[q[k - 1, i] r[k - 1 - i], {i, 0, k - 1}]
p[n_, k_] := (2^(n - k))*5^k
v[n_] := Sum[p[n, k] r[n - k], {k, 0, n}]
Table[v[n], {n, 0, 20}] (* A193656 *)
TableForm[Table[q[i, k], {i, 0, 4}, {k, 0, i}]]
Table[r[k], {k, 0, 8}] (* *)
TableForm[Table[p[n, k], {n, 0, 4}, {k, 0, n}]]
CROSSREFS
KEYWORD
nonn
AUTHOR
Clark Kimberling, Aug 02 2011
STATUS
approved