SAMs | R Documentation |
The data consist of the boundary data of the shoot apical meristems (SAMs) from six genera.
data(SAMs)
In the data set, there are three columns of variables: Genus
, x
, and y
.
Genus
saves the genus information for each SAM;
x
saves the x
coordinates of the six SAMs in the Cartesian coordinate system (unitless);
and y
saves the y
coordinates of the six SAMs in the Cartesian coordinate system (unitless).
In Genus
, there are six genera including Glycine, Coleus, Juniperus, Pinus,
Equisetum, and Isoetes, spanning the three lineages: angiosperms, gymnosperms, and pteridophytes.
Shi, P., Gielis, J., Quinn, B.K., Niklas, K.J., Ratkowsky, D.A., Schrader, J., Ruan, H.,
Wang, L., Niinemets, Ü. (2022) 'biogeom': An R package for simulating and fitting natural
shapes. Annals of the New York Academy of Sciences 1516, 123-
134. \Sexpr[results=rd]{tools:::Rd_expr_doi("10.1111/nyas.14862")}
fitAM
, PlanCoor
, SurfaceAreaAM
, VolumeAM
#### See Shi et al. (2025) for details #########################################
# Shi, P., Liu, X., Gielis, J., Beirinckx, B., Niklas, K.J. (2025)
# Comparison of six non-linear equations in describing the 2-D
# profiles of apical meristems. American Journal of Botany (under review).
################################################################################
data(SAMs)
uni.sam <- sort( unique(SAMs$Genus) )
ind <- 2
Data <- SAMs[SAMs$Genus==uni.sam[ind], ]
x0 <- Data$x
y0 <- Data$y
Res1 <- adjdata(x0, y0, ub.np=200, times=1.2, len.pro=1/20)
X <- Res1$x
Y <- Res1$y
dev.new()
plot( X, Y, pch=1, cex.lab=1.5, cex.axis=1.5,
xlab=expression(paste(italic(x), " (unitless)", sep="")),
ylab=expression(paste(italic(y), " (unitless)", sep="")) )
graphics.off()
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.