

A122065


Take sum of squares of digits of previous term; start with 74169.


14



74169, 183, 74, 65, 61, 37, 58, 89, 145, 42, 20, 4, 16, 37, 58, 89, 145, 42, 20, 4, 16, 37, 58, 89, 145, 42, 20, 4, 16, 37, 58, 89, 145, 42, 20, 4, 16, 37, 58, 89, 145, 42, 20, 4, 16, 37, 58, 89, 145, 42, 20, 4, 16, 37, 58, 89, 145, 42, 20, 4, 16, 37, 58, 89, 145, 42, 20, 4
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,1


COMMENTS

From a quiz, cf. Russel & Carter reference.


REFERENCES

K. Russell and P. Carter, Number Puzzles, W. Foulsham and Co. Ltd. (1993).


LINKS



FORMULA



MATHEMATICA



PROG

(Magma) [74169, 183, 74, 65, 61] cat &cat[[37, 58, 89, 145, 42, 20, 4, 16]: n in [0..17]]; // Vincenzo Librandi, Jan 29 2013
(PARI) A122065_vec=vector(50, n, t=if(n>1, norml2(digits(t)), 74169));


CROSSREFS

Cf. A000216 (main entry for related sequences), A003132 (the iterated "sum digits squared" map).


KEYWORD

nonn,base,easy


AUTHOR

Herman Jamke (hermanjamke(AT)fastmail.fm), Sep 14 2006


STATUS

approved



