找回密码
 注册
查看: 1466|回复: 0

R语言:cSplineDes()函数中文帮助文档(中英文对照)

[复制链接]
发表于 2012-2-16 17:35:39 | 显示全部楼层 |阅读模式
cSplineDes(mgcv)
cSplineDes()所属R语言包:mgcv

                                        Evaluate cyclic B spline basis
                                         评估周期B样条的基础上

                                         译者:生物统计家园网 机器人LoveR

描述----------Description----------

Uses splineDesign to set up the model matrix for a cyclic B-spline basis.
使用splineDesign循环的B样条的基础上成立的模型矩阵。


用法----------Usage----------


cSplineDes(x, knots, ord = 4)



参数----------Arguments----------

参数:x
covariate values for smooth.
流畅协价值观。


参数:knots
The knot locations: the range of these must include all the data.
结的位置:这些范围必须包括所有的数据。


参数:ord
order of the basis. 4 is a cubic spline basis. Must be >1.
秩序的基础。四是三次样条的基础上。必须大于1。


Details

详情----------Details----------

The routine is a wrapper that sets up a B-spline basis, where the basis functions wrap at the first and
例程是一个包装,设置了B样条的基础上,在基础功能包在第一和


值----------Value----------

A matrix with length(x) rows and length(knots)-1 columns.
length(x)行length(knots)-1列矩阵。


作者(S)----------Author(s)----------


Simon N. Wood <a href="mailto:simon.wood@r-project.org">simon.wood@r-project.org</a>



参见----------See Also----------

cyclic.p.spline
cyclic.p.spline


举例----------Examples----------


## create some x's and knots...[#创建一些X和结...]
n <- 200
x <- 0n-1)/(n-1);k<- 0:5/5
X &lt;- cSplineDes(x,k) ## cyclic spline design matrix[#循环样条设计矩阵]
## plot evaluated basis functions...[#绘制评估的基础上功能...]
plot(x,X[,1],type="l"); for (i in 2:5) lines(x,X[,i],col=i)
## check that the ends match up....[#检查两端匹配....]
ee <- X[1,]-X[n,];ee
tol <- .Machine$double.eps^.75
if (all.equal(ee,ee*0,tol=tol)!=TRUE)
   stop("cyclic spline ends don't match!")

## similar with uneven data spacing...[#类似的间距不均匀数据...]
x &lt;- sort(runif(n)) + 1 ## sorting just makes end checking easy[#排序只是使最终检查容易]
k &lt;- seq(min(x),max(x),length=8) ## create knots[#创建节]
X &lt;- cSplineDes(x,k) ## get cyclic spline model matrix  [#循环样条模型矩阵]
plot(x,X[,1],type="l"); for (i in 2:ncol(X)) lines(x,X[,i],col=i)
ee &lt;- X[1,]-X[n,];ee ## do ends match??[#两端匹配??]
tol <- .Machine$double.eps^.75
if (all.equal(ee,ee*0,tol=tol)!=TRUE)
   stop("cyclic spline ends don't match!")

转载请注明:出自 生物统计家园网(http://www.biostatistic.net)。


注:
注1:为了方便大家学习,本文档为生物统计家园网机器人LoveR翻译而成,仅供个人R语言学习参考使用,生物统计家园保留版权。
注2:由于是机器人自动翻译,难免有不准确之处,使用时仔细对照中、英文内容进行反复理解,可以帮助R语言的学习。
注3:如遇到不准确之处,请在本贴的后面进行回帖,我们会逐渐进行修订。
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

手机版|小黑屋|生物统计家园 网站价格

GMT+8, 2025-1-23 00:58 , Processed in 0.020944 second(s), 16 queries .

Powered by Discuz! X3.5

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表