📄 skye.html
字号:
<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html><head><title>R: AFM Compositions of Aphyric Skye Lavas</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<link rel="stylesheet" type="text/css" href="../../R.css">
</head><body>
<table width="100%" summary="page for Skye {MASS}"><tr><td>Skye {MASS}</td><td align="right">R Documentation</td></tr></table>
<h2>AFM Compositions of Aphyric Skye Lavas</h2>
<h3>Description</h3>
<p>
The <code>Skye</code> data frame has 23 rows and 3 columns.
</p>
<h3>Usage</h3>
<pre>
Skye
</pre>
<h3>Format</h3>
<p>
This data frame contains the following columns:
<dl>
<dt><code>A</code></dt><dd>Percentage of sodium and potassium oxides
</dd>
<dt><code>F</code></dt><dd>Percentage of iron oxide
</dd>
<dt><code>M</code></dt><dd>Percentage of magnesium oxide
</dd></dl>
<h3>Source</h3>
<p>
R. N. Thompson, J. Esson and A. C. Duncan (1972)
Major element chemical variation in the Eocene lavas of the Isle of
Skye. <EM>J. Petrology</EM>, <B>13</B>, 219–253.
</p>
<h3>References</h3>
<p>
J. Aitchison (1986)
<EM>The Statistical Analysis of Compositional Data.</EM>
Chapman and Hall, p.360.
</p>
<p>
Venables, W. N. and Ripley, B. D. (2002)
<EM>Modern Applied Statistics with S.</EM> Fourth edition. Springer.
</p>
<h3>Examples</h3>
<pre>
# ternary() is from the on-line answers.
ternary <- function(X, pch = par("pch"), lcex = 1,
add = FALSE, ord = 1:3, ...)
{
X <- as.matrix(X)
if(any(X < 0)) stop("X must be non-negative")
s <- drop(X %*% rep(1, ncol(X)))
if(any(s<=0)) stop("each row of X must have a positive sum")
if(max(abs(s-1)) > 1e-6) {
warning("row(s) of X will be rescaled")
X <- X / s
}
X <- X[, ord]
s3 <- sqrt(1/3)
if(!add)
{
oldpty <- par("pty")
on.exit(par(pty=oldpty))
par(pty="s")
plot(c(-s3, s3), c(0.5-s3, 0.5+s3), type="n", axes=FALSE,
xlab="", ylab="")
polygon(c(0, -s3, s3), c(1, 0, 0), density=0)
lab <- NULL
if(!is.null(dn <- dimnames(X))) lab <- dn[[2]]
if(length(lab) < 3) lab <- as.character(1:3)
eps <- 0.05 * lcex
text(c(0, s3+eps*0.7, -s3-eps*0.7),
c(1+eps, -0.1*eps, -0.1*eps), lab, cex=lcex)
}
points((X[,2] - X[,3])*s3, X[,1], ...)
}
ternary(Skye/100, ord=c(1,3,2))
</pre>
<hr><div align="center">[Package <em>MASS</em> version 7.2-44 <a href="00Index.html">Index]</a></div>
</body></html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -