The function plot the resulting species subniche of the WitOMI calculation.
# S3 method for subniche
plot(
x,
xax = 1,
yax = 2,
ax.angle.arrow = 20,
ax.col.arrow = "black",
ax.length.arrow = 0.1,
ax.lwd.arrow = 1,
ax.leg.posi = "bottomleft",
ax.leg.cex = 1.2,
eig.col.chos = "black",
eig.col.left = "gray",
eig.leg.posi = "topright",
eig.leg.cex = 1.2,
su.leg.posi = "bottomleft",
su.leg.cex = 1.2,
col.axis = "azure3",
lty.axis = 2,
lwd.axis = 2,
var.col.arrow = "black",
var.length.arrow = 0.1,
var.lwd.arrow = 1,
var.angle.arrow = 20,
var.leg.posi = "bottomleft",
var.leg.cex = 1.2,
fac.var.lab = 1.2,
col.var = "black",
col.su = "black",
col.G_k = "red",
nic.leg.posi = "bottomleft",
nic.leg.cex = 1.2,
sub.leg.cex = 1.2,
sub.leg.posi = "bottomleft",
pch.su = 16,
cex.su = 1,
border.E = "#92c5de",
col.E = "#92c5de",
lty.E = 1,
border.K = "black",
col.K = "#2c7fb8",
lty.K = 1,
show.lines = F,
...
)
an object of class subniche
.
column for abscissas.
column for ordinate.
arrow angle head for plot labeled "Axes", see arrows for more details.
arrow color for plot labeled "Axes", see arrows for more details.
arrow head length for plot labeled "Axes", see arrows for more details.
arrow width for plot labeled "Axes", see arrows for more details.
legend position for plot labeled "Axes", see legend for more details.
legend size label for plot labeled "Axes", see legend for more details.
bar color for the selected components for plot labeled "Eigenvalues".
bar color for the component leftover for plot labeled "Eigenvalues".
legend position for plot labeled "Eigenvalues", see legend for more details.
legend size label for plot labeled "Eigenvalues"", see legend for more details.
legend position for plot labeled "SU", see legend for more details.
legend size label for plot labeled "SU", see legend for more details.
axis color, see par for more details.
axis line type, see par for more details.
axis width, see par for more details.
variables arrow color for plot labeled "Variables and Species", see arrows for more details.
variables arrow length of the edges of the arrow head (in inches).
variables arrow width for plot labeled "Variables and Species", see arrows for more details.
variables arrow angle head for plot labeled "Variables and Species", see arrows for more details.
legend position for plot labeled "Variables and Species", see legend for more details.
legend size label for plot labeled "Variables and Species", see legend for more details.
factor for moving the variable labels from its original coordinates for clarity, by defaults they are multiply 1.2
color variables labels, see textplot for more details.
color of sampling units, see points for more details.
color label G_k, see textplot for more details.
legend position for plot labeled "Niches", see legend for more details.
legend size label for plot labeled "Niches", see legend for more details.
legend size label for plot labeled "Subsets"", see legend for more details.
legend position for plot labeled "Subsets", see legend for more details.
type of the points representing the sampling units (SU), see points for more details.
size of the points representing the sampling units (SU), see points for more details.
color border of E polygon, see polygon for more details.
inside color of E polygon, see polygon for more details.
line type for the E border, see polygon for more details.
color border of K polygon, see polygon for more details.
inside color of K polygon, see polygon for more details.
line type for the K border, see polygon for more details.
if true, then lines are plotted between x,y and the word, for those words not covering their x,y coordinates. See textplot for more details.
further arguments passed to or from other methods.
The function illustrate the results of subniche calculation with a great deal of customization parameters.
library(subniche)
data(doubs)
dudi1 <- dudi.pca(doubs$env, scale = TRUE, scan = FALSE, nf = 3)
nic1 <- niche(dudi1, doubs$fish, scann = FALSE)
# number of sites
N <- dim(nic1$ls)[1]
#Create a factor which defines the subsets
fact <- factor(c(rep(1,N/2),rep(2,N/2)))
# nic1 will be use as reference and fact will be use to define the subniches environment
subnic1 <- subniche(nic1, fact)
plot(subnic1)
Run the code above in your browser using DataLab