%I #10 Jul 26 2015 03:59:51

%S 60,100,140,220,340,540,900,1500,2500,4140,6900,11500,19140,31900,

%T 53140,88540,147540,245900,409820,683020,1138340,1897220,3162020,

%U 5270020,8783340,14638900,24398140,40663540,67772540,112954220,188257020

%N Repeatedly convert from sexagesimal to centesimal, starting with 60.

%C Each number n of the sequence represents a number of minutes. This number can also be expressed in h hours (h as large as possible) and m minutes (m is the remainder; if there is no remainder then let m = "00"). The successor of n in the sequence is the simple juxtaposition of h and m.

%F a(n) = 100*floor(a(n-1)/60) + mod(a(n-1), 60).

%e 60 reads "60 minutes"; 60 minutes are 1 hour and 00 minutes, thus 100;

%e 100 then reads "100 minutes"; 100 minutes are 1 hour and 40 minutes, thus 140; etc.

%t f[n_] := 100Floor[n/60] + Mod[n, 60]; NestList[f, 60, 30] (* _Robert G. Wilson v_, Sep 22 2004 *)

%K base,easy,nonn

%O 1,1

%A _Eric Angelini_, Sep 21 2004

%E Edited, corrected and extended by _Robert G. Wilson v_, Sep 22 2004