ListLinePlot[{Re[#], Im[#]} & /@ LinearRecurrence[{Exp[I Pi/Sqrt[2]], I}/1.1, {1, 1}, 100], PlotRange -> All, AspectRatio -> Automatic]