mathplot : expression()

그래프 위에 수식을 표현하기 위해서는 expression()함수를 사용하면 된다.

plot(cars$speed, cars$dist)
text(10, 115, labels = expression(list[i] == beta[0] + beta[1]%*%speed[i] + epsilon[i]))

[참고] http://vis.supstat.com/2013/04/mathematical-annotation-in-r/