Plot[Binomial[n, 2], {n, -5, 5}]