[go: up one dir, main page]

login
A097714
Repeatedly convert from sexagesimal to centesimal, starting with 60.
0
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.
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
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