RSolve[{f[n]==8f[n-1]-15f[n-2]+6 2^n,f[1]==2,f[2]==8},f[n],n]