|
Search: id:A006591
|
|
|
| A006591 |
|
Sum_{k = 1..n } nearest integer to n/k (if n/k is midway between two numbers take the smaller).
(Formerly M2434)
|
|
+0
1
|
|
| 1, 3, 5, 8, 11, 14, 17, 22, 24, 28, 33, 36, 40, 45, 48, 53, 57, 62, 66, 71, 74, 79, 86, 89, 93, 99, 102, 109, 114, 117, 122, 129, 133, 138, 143, 148, 152, 159, 164, 169, 175, 178, 185, 190, 193, 202, 207, 212, 215, 223, 227, 232, 241, 244, 249, 256, 259, 266, 273
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
REFERENCES
|
Marc LeBrun (mlb(AT)well.com), personal communication.
|
|
EXAMPLE
|
a(3) = 3 + 1 + 1 = 5. a(7) = 17 = 7 + 3 + 2 + 2 + 1 + 1 + 1.
|
|
MATHEMATICA
|
rnd[n_] := If[Mod[n, 1] > .5, Ceiling[n], Floor[n]]; Table[ Sum[ rnd[ n/k], {k, 1, n} ], {n, 1, 70} ]
|
|
CROSSREFS
|
Cf. A006218.
Adjacent sequences: A006588 A006589 A006590 this_sequence A006592 A006593 A006594
Sequence in context: A130262 A094228 A001855 this_sequence A052488 A076372 A005356
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
njas
|
|
EXTENSIONS
|
More terms from Robert G. Wilson v (rgwv(AT)rgwv.com), Oct 22 2001
|
|
|
Search completed in 0.002 seconds
|
