RSolve[ { a[n] = 1/8 (7 a[n - 1] - a[n - 2]), a[2] = 27/40 a[1], a[1] =5/8 x }, a[n] ,n ]