print.copula(SpatialExtremes)
print.copula()所属R语言包:SpatialExtremes
Printing objects of class copula”
印刷对象的类系词“
译者:生物统计家园网 机器人LoveR
描述----------Description----------
A method for printing object of class “copula”.
类“系词”打印对象的方法。
用法----------Usage----------
## S3 method for class 'copula'
print(x, digits = max(3, getOption("digits") - 3), ...)
参数----------Arguments----------
参数:x
An object of class “copula. Most often, x is the output of the fitcopula function.
对象类“系词。大多数情况下,x是的输出fitcopula功能。
参数:digits
The number of digits to be printed.
要打印的数字位数。
参数:...
Other options to be passed to the print function.
到传递给print功能的其他选项。
值----------Value----------
Print several information on screen.
在屏幕上打印多的信息。
(作者)----------Author(s)----------
Mathieu Ribatet
实例----------Examples----------
n.site <- 30
n.obs <- 50
coord <- matrix(runif(2 * n.site, -10, 10), ncol = 2)
colnames(coord) <- c("lon", "lat")
## Generate data from a Gaussian copula model[#生成一个的高斯Copula函数模型的数据。]
data <- rcopula(n.obs, coord, "gaussian", "powexp", nugget = 0, range = 4, smooth = 1.2)
## Transform the margins to GEV[#变换的边缘GEV]
locs <- -5 + coord[,"lon"] / 10
scales <- 10 + coord[,"lat"] / 2
shapes <- rep(0.2, n.site)
for (i in 1:n.site)
data[,i] <- frech2gev(data[,i], locs[i], scales[i], shapes[i])
## Fit a Gaussian copula model[#符合高斯copula模型]
## 1. Define trend surfaces[#1。定义趋势面]
loc.form <- y ~ lon
scale.form <- y ~ lat
shape.form <- y ~ 1
## 2. Fit[#2。适合]
M0 <- fitcopula(data, coord, "gaussian", "powexp", loc.form, scale.form,
shape.form, nugget = 0)
M0
转载请注明:出自 生物统计家园网(http://www.biostatistic.net)。
注:
注1:为了方便大家学习,本文档为生物统计家园网机器人LoveR翻译而成,仅供个人R语言学习参考使用,生物统计家园保留版权。
注2:由于是机器人自动翻译,难免有不准确之处,使用时仔细对照中、英文内容进行反复理解,可以帮助R语言的学习。
注3:如遇到不准确之处,请在本贴的后面进行回帖,我们会逐渐进行修订。
|