cp's OEIS Frontend

A112667 a(n+1) is the sum of the units digit of a(n) and the square of the tens digit of a(n).

%I A112667 #11 Aug 25 2015 11:24:07
%S A112667 97,88,72,51,26,10,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
%T A112667 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
%U A112667 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1
%N A112667 a(n+1) is the sum of the units digit of a(n) and the square of the tens digit of a(n).
%H A112667 K. Sengup, <a href="http://sg.answers.yahoo.com/question/index?qid=20070223002532AAY73VR&amp;show=7">What is the next number in the series 97 88 72 51 26?</a>.
%H A112667 <a href="/index/Rec#order_01">Index entries for linear recurrences with constant coefficients</a>, signature (1).
%t A112667 nxt[n_]:=Module[{u=Last[IntegerDigits[n]],t=Floor[n/10]},u+t^2]; NestList[nxt,97,110] (* _Harvey P. Dale_, Oct 22 2013 *)
%K A112667 nonn,base
%O A112667 1,1
%A A112667 _N. J. A. Sloane_, based on email from _R. J. Mathar_, Apr 04 2007