|
Search: id:A116919
|
|
| |
|
| 1, 2, 4, 5, 9, 8, 8, 9, 11, 20, 15, 16, 14, 20, 19, 34, 33, 28, 25, 24, 23, 44, 33, 34, 41, 66, 37, 64, 30, 34, 47, 78, 45, 38, 53, 88, 47, 84, 45, 44, 51, 58, 71, 114, 63, 52, 59, 106, 101, 150, 55, 62, 83, 136, 71, 126, 63, 64, 60, 64, 62
(list; graph; listen)
|
|
|
OFFSET
|
0,2
|
|
|
MATHEMATICA
|
a={1, 2, 4}; For[n=3, n<=60, n++, b=n+FactorInteger[a[[n]]][[ -1, 1]]; AppendTo[a, b]]; a - Stefan Steinerberger (stefan.steinerberger(AT)gmail.com), May 18 2007
|
|
CROSSREFS
|
Cf. A006530.
Sequence in context: A011341 A116477 A116920 this_sequence A111490 A079784 A072795
Adjacent sequences: A116916 A116917 A116918 this_sequence A116920 A116921 A116922
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Leroy Quet (qq-quet(AT)mindspring.com), Feb 26 2006
|
|
EXTENSIONS
|
More terms from Stefan Steinerberger (stefan.steinerberger(AT)gmail.com), May 18 2007
|
|
|
Search completed in 0.002 seconds
|