Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
A227842
First differences of A014817.
3
1, 2, 3, 2, 4, 5, 6, 5, 5, 8, 9, 6, 10, 11, 12, 7, 13, 12, 15, 12, 14, 17, 18, 13, 15, 20, 19, 16, 22, 21, 24, 17, 21, 26, 27, 18, 26, 29, 28, 21, 29, 28, 33, 28, 30, 33, 36, 27, 31, 34, 35, 32, 38, 39, 40, 31, 37, 42, 45, 32, 44, 45, 46, 33, 45, 44, 49, 44, 46, 51, 52, 37, 49, 56, 49, 48, 54, 53, 60, 47
OFFSET
1,2
MAPLE
A227842 := proc(n)
A014817(n+1)-A014817(n) ;
end proc:
seq(A227842(n), n=1..80) ; # R. J. Mathar, Aug 09 2013
MATHEMATICA
Differences[Table[Sum[Floor[k^2/n], {k, n}], {n, 100}]] (* Harvey P. Dale, Sep 13 2024 *)
CROSSREFS
Sequence in context: A304732 A304729 A297161 * A304731 A304728 A369609
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Aug 08 2013
STATUS
approved