plot[y=C(n,2)*5^(n-2)/6^(n+2),{n,1,99}]