Simplify[RSolve[f[x+1]-f[x]==Tan[x],f[x],x]]