A097714 Repeatedly convert from sexagesimal to centesimal, starting with 60.

60, 100, 140, 220, 340, 540, 900, 1500, 2500, 4140, 6900, 11500, 19140, 31900, 53140, 88540, 147540, 245900, 409820, 683020, 1138340, 1897220, 3162020, 5270020, 8783340, 14638900, 24398140, 40663540, 67772540, 112954220, 188257020

Offset

1,1

Comments

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.

Links

Table of n, a(n) for n=1..31.

Formula

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

Example

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

Mathematica

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

Crossrefs

Sequence in context: A335201 A267434 A048934 * A272515 A043221 A039398

Adjacent sequences: A097711 A097712 A097713 * A097715 A097716 A097717

Keyword

base,easy,nonn

Author

Eric Angelini, Sep 21 2004

Extensions

Edited, corrected and extended by Robert G. Wilson v, Sep 22 2004

Status

approved