# RSolve works slow and does not give an analytical solution for solving high order linear difference equations

RSolve@@{{a[n]-a[n-10]==101}~Join~Table[a[i+1]==101+10i,{i,0,9}],a[n],n}


I want to get the exact form of general formulas, but RSolve only gives a DifferenceRoot object. I tried FunctionExpand but it does not work.

-
You can get the generic solution easily with the substitution a[n]->101 Log[b[n]]. The difficult bit seems to be matching your initial condition, though a numerical solution is found quickly. –  b.gatessucks May 19 at 8:52