常用S-PLUS函数.docVIP

常用S-Plus函数 用随机数建立一个数据框 x-data.frame(R1=rnorm(200),R2=2+rnorm(200)*2) 对数据框中的变量画直方图 histogram(~varname,data=dataframeneme[,nint=20 #bar的数量] [,tpye=count#计数，默认为百分比}) 对向量做直方图 histogram(~vectorname) x - rnorm(100) ks - ksmooth(x, kernel = normal, bandwidth = bandwidth.nrd(x)) hist(x, prob = T, ylab = Density,xlab=概率密度估计曲线,xlab.size=30, col =105) lines(ks$x, ks$y, col = 6, lwd = 3) 1 数据操作处理函数 attach() 调入数据name.cols 列名 numCols 返回列数 numRows 返回行数 mean 均值 median 中值max 最大值min 最小值 stdev 标准差 var() 方差协方差 cor() 相关系数 sum 求和prod 求乘积 colMeans(x, na.rm=F, dims=1) colSums(x, na.rm=F, dims=1) colVars(x, na.rm=F, dims=1, unbiased=T, SumSquares=F) colStdevs(x, na.rm=F, dims=1, unbiased=T, SumSquares=F) rowMeans(x, na.rm=F, dims=1) rowSums(x, na.rm=F, dims=1) rowVars(x, na.rm=F, dims=1, unbiased=T, SumSquares=F) rowStdevs(x, na.rm=F, dims=1, unbiased=T, SumSquares=F) 矩阵函数 vector(mode=logical, length=0) 生成向量 is.vector(x, mode=any) as.vector(x, mode=any) matrix(data=NA, nrow= , ncol= ,byrow=F, dimnames=NULL) ncol(x) 设定矩阵的列数 nrow(x) 设定矩阵的行数 is.matrix(x) as.matrix(x) t(m) 转置 paste 连接字符串 Plot() densityplot(~x) 作密度图 barplot 作柱形图hist(x) 作直方图 histogram(~x) 作直方图rnorm() 生成正态随机数 ceiling(x) floor(x) trunc(x) exp(x) log(x) 自然对数 logb(x, base= ) 给定底数的对数值 log10(x) 常用对数:10为底 sqrt(x) par(mfrow=c(3,3)) for (i in 1:9) {for (j in 1:9) { a-rbeta(3000,i/10,j/10) den2- density(a) plot(den2$x,den2$y,type=l,col=98,xlab=paste(a=,i/10, b=,j/10),ylab= ) } } i-1 while(i20) {cat(this is =,i,\t); if (i%%5==0) cat(\n) i=i+1; }; par(mfrow=c(3,3)) y- rnorm(50) plot(y,col=40,type=l,ylab=,main=option is l) plot(y,col=40,type=p,ylab=,main=option is p) plot(y,col=40,type=b,ylab=,main=option is b) plot(y,col=40,type=o,ylab=,main=option is o) plot(y,col=40,type=s,ylab=,main=option is s) plot(y,col=40,type=h,ylab=,main=option is h) plot(y,col=40,type=n,ylab=,main=option is n) S-Plus循环控制语句 for(name in values) expr while(test) expr repeat expr break next 选择子