Description Usage Arguments Details Value Author(s) See Also Examples
Reads a plant file (a Yplant input file with extension .p, known as a pfile),
and writes a new pfile, by modifying angles, internode lengths, or segment diameters.
1 2 3 4 5 6 7 8 | modifypfile(pfile = NA, whichvar = NA, outputfile = "tmp.p",
newvalues = NULL)
replaceangles(whichangle="An.3", pfile=NA, outputfile = NA,
newangles = NULL, distobj = NULL)
changeinternodes(pfile=NA,outputfile = "tmp.p",method=c("perc","constant"),
changeperc=50, consvalue = NA)
|
whichangle |
By default the leaf angle, or one of the other angles (see Details). |
pfile |
Name of the .p file. |
outputfile |
Name of the new file. |
distobj |
An object of class |
newangles |
A vector of angles to be used in the new p file (optional, in stead of distobj). |
whichvar |
Name of variable in p file to modify (see |
newvalues |
Vector of new values for the variable that is to be replaced. |
method |
for |
changeperc |
If method="perc", change the internodes by this percentage of their orginal value. |
consvalue |
If method="constant", change all internodes to this constant value. |
The function 'modifypfile' is a general function that can be used to modify any variable
in a pfile. The following variables can be changed in a pfile :
Azimuth and angle of stem sections
Orientation angle of the midrib of the leaf
Branch sections
Petioles
Leaves
The function replaceangles is a specialized version for replacing leaf angles
(and do some specific error checking, or sampling from leaf angle distributions). The function changeinternodes
is a special function for lengths of woody segments (technically not quite the same as internodes!).
For replaceangles, an object of class angledist can be constructed with the angledist function in
package LeafAngle (See Example below) or from fitting to a sample with fitdistribution. If angles are provided but the vector is
too short, the vector will be sampled with replacement.
A new pfile is created, by default with the name "tmp.p", unless
the argument outputfile is set.
Remko Duursma
readp, fitdistribution, readl, constructplant
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 | ## Not run:
# Replace angles by sampling from an ellipsoidal distribution:
mydist <- angledist("ellipsoid", distpars=0.7)
replaceangles(pfile="someplant.p", distobj=mydist)
# Make constant angles:
replaceangles(pfile="someplant.p", newangles=45)
# Change new file name:
replaceangles(pfile="someplant.p", outputfile="someplant 45degrees.p", newangles=45)
# Change petiole orientation, choose pfile with dialog box:
replaceangles("Az.2", newangles=runif(300, 0, 360))
# Modify various variables in a pfile, until we end up with an artificial plant,
# useful for testing.
# Order of changes, in this case (although it does not matter!):
# Leaf azimuth, leaf orientation, leaf angle, petiole length, petiole angle.
modifypfile("originalplant.p", whichvar="Az.3", outputfile="testplant.p", newvalues=45)
modifypfile("testplant.p", whichvar="Or", outputfile="testplant.p", newvalues=45)
modifypfile("testplant.p", whichvar="An.3", outputfile="testplant.p", newvalues=-45)
modifypfile("testplant.p", whichvar="L.2", outputfile="testplant.p", newvalues=10)
modifypfile("testplant.p", whichvar="An.2", outputfile="testplant.p", newvalues=45)
## End(Not run)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.