asc3s(SECP)
asc3s()所属R语言包：SECP
Anisotropic set cover on the 3D square lattice
对3D正方晶格的各向异性集合覆盖
译者：生物统计家园网 机器人LoveR
描述----------Description----------
asc3s() function calculates the boundary coordinates for the anisotropic set cover on the 3D square lattice with a fixed face along the lattice boundary.
asc3s()函数计算出一个固定面的晶格边界上的3D正方晶格各向异性集合覆盖的边界坐标。
用法----------Usage----------
asc3s(k=12, x=rep(95, times=3), dir=3, r=(x[dir]-3)^(seq(k)/k))
参数----------Arguments----------
参数：k
a maximal set cover size: k>2.
一个最大的集封面尺寸：k>2。
参数：x
a vector of lattice sizes: all(x>5).
一个向量的晶格尺寸：all(x>5)。
参数：dir
a variable component index: x) dir=1; y) dir=2; z) dir=3.
变量的成分指数：X）dir=1的，Y）dir=2; Z）dir=3。
参数：r
a variable lenght of set cover elements: all((0<r)&(r<x)).
一个可变长度的一组封面元素：all((0<r)&(r<x))。
Details
详细信息----------Details----------
The percolation is simulated on 3D square lattice with uniformly weighted sites and the constant parameter p.
的渗透是模拟3D正方形格子均匀加权的网站和常量参数p。
The percolation cluster is formed from the accessible sites connected with initial sites subset.
的渗滤聚类形成从与初始网站子集连接的可访问的站点。
If an initial cluster subset in the lattice center, to estimate the mass fractal dimension requires an anisotropic set cover with a fixed face along the lattice boundary.
如果初始聚类的晶格中心的子集，估计质量的分形维数，需要一个固定面的晶格边界的各向异性盖。
The anisotropic set cover on 3D square lattice is formed from scalable cuboids with a variable length r+1 and a fixed face along the lattice boundary.
3D正方晶格上形成各向异性集合覆盖从可伸缩长方体与可变长度r+1和一个固定的面沿晶格边界。
值----------Value----------
A list of boundary coordinates and sizes for the anisotropic set cover on a 3D square lattice with a fixed face along the lattice boundary.
对于各向异性的集合覆盖与固定面沿晶格边界上的一个3D正方晶格的边界的坐标和大小的列表。
（作者）----------Author(s)----------
Pavel V. Moskalev
参见----------See Also----------
fdc2s, fds2s, fds3s
fdc2s，fds2s，fds3s
实例----------Examples----------
# # # # # # # # # # # # # # # # #[＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃]
# Example: Anisotropic set cover, dir=3[例如：各向异性集合覆盖，DIR = 3]
# # # # # # # # # # # # # # # # #[＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃]
pc <- .311608
p2 <- pc + .03
lx <- 33; ss <- (lx+1)/2; ssz <- seq(lx^2+lx+2, 2*lx^2-lx-1)
set.seed(20120627); ac2 <- ssi30(x=lx, p=p2, set=ssz, all=FALSE)
bnd <- asc3s(k=9, x=dim(ac2), dir=3)
x <- z <- seq(lx); y2 <- ac2[,ss,]
image(x, z, y2, cex.main=1,
main=paste("Anisotropic set cover and\n",
"a 3D cluster of sites in the y=",ss," slice with\n",
"(1,0)-neighborhood and p=",
round(p2, digits=3), sep=""))
rect(bnd["x1",], bnd["z1",], bnd["x2",], bnd["z2",])
abline(v=ss, lty=2)
转载请注明:出自 生物统计家园网(http://www.biostatistic.net)。
注：
注1：为了方便大家学习，本文档为生物统计家园网机器人LoveR翻译而成，仅供个人R语言学习参考使用，生物统计家园保留版权。
注2：由于是机器人自动翻译，难免有不准确之处，使用时仔细对照中、英文内容进行反复理解，可以帮助R语言的学习。
注3：如遇到不准确之处，请在本贴的后面进行回帖，我们会逐渐进行修订。
|
发表于 2012-9-29 23:53:11
