<Problem>
http://ntucoder.net/Problem/Details/1196
Uses Crt;
Var i:longint; t,n:int64;
Begin
readln(n);
for i:=1 to n-1 do
t:=t+(i*(n-i));
t:=t+n;
writeln(t);
readln;
End.