## 다항함수

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))

AND