## 다항함수
f1 <- function(x){x^2+3*x}
f2 <- function(x,y){2*x+3*y}
e1 <- expression(x^3+x^2+x)
f1(1)
f2(1,2)
## class 확인하기
class(f1) ; class(f2) ; class(e1)
## 미분, 적분하기
D(e1,"x")
integrate(f1,1,2)
## 그래프로 표현하기
plot(f1,main="plot1",xlab="xlab1",ylab="ylab1")
## Environment 확인 및 관리하기
ls()
rm(list=ls(all=TRUE))
## 다항방정식의 해 구하기
polyroot(c(2,3,3,4))