'data()' 내장된 자료 파일 불러오기
> library(help=survival)
15%/%7 : integer part
15%%7: remainder part
> s = seq(-5, 5, by=.2) > s = seq(length=51, from=-5, by.-2) > a = rep(x, times=5) > a = rep(x, each=5)
A가 50개, B가 17개, C가 8개인 벡터를 만든 뒤 상대빈도를 이용한 파이 챠트를 그려 보라. paste() 함수 사용법에 익숙해져라.
a = rep("A",50)
b = rep("B",17)
c = rep("C", 8)
# d = c(1,2,1,2,3,2,1,2,3,2,2,1,2,3,2,1,1,1,1)
x = c(a, b, c)
y = as.matrix(table(x))
relative_freq = round(y[,1]/length(x)*100, digit=1)
y = cbind(y, relative_freq)
lab = c("A","B","C")
w = paste(lab, "(", relative_freq, "%", ")")
pie(y[,1],label=w,main="Pie chart")