[R] 빈 Plot에서 텍스트 쓰기

스크립트	결과
# 데이터 생성 data<-rnorm(100,0,1) # 정규성 검정 nt=shapiro.test(data) # 빈 plot 생성 plot.new() # 텍스트 출력 text(   x=0.5,y=0.9,   cex=2,   "Shapiro-Wilk normality test" ) text(   x=0.5,y=0.7,   cex=1.5, col="blue",   sprintf("W = %f", nt[1]) ) text(   x=0.5,y=0.5,   cex=1.5, col="red",   sprintf("p-value = %3.5f", nt[2]) )