View source: R/fvs_protype_params.R
fvs_protype_params | R Documentation |
make keyfiles for each row in the input data frame
fvs_protype_params(add_params = NULL)
add_params |
optional substitution parameters, but must match substitution in keyfile using @somekey@ |
make keyfiles for each row in the input data frame
Revision History
1.0 | 2021 Oct 15 Created |
data.frame with parameters for FVS key files
Jacob Strunk <someone@somewhere.com>
fvs_run
fvs_keyfile_prototype
clus1 = parallel::makeCluster(4)
#assume a typical inventory dataset and prepare fvs parameters
stand_data = data.frame(stand=1:10, year=2000:2009)#'
df_params = fvs_protype_params()
df_params[1:nrow(stand_data),]=NA
df_params[,"cn"] = stand_data$stand
df_params[,"invyr"] = stand_data$year
df_params[,"timeint"] = 1
df_params[,"numcycle"] = 1
df_params[,"input_db"] = "c:/temp/fordata.db"
df_params[,"fvs_path"] = "C:/FVSbin/FVSca.exe"
df_params[,"tree_table"] = "fvs_treeinit"
df_params[,"stand_table"] = "fvs_standinit"
df_params
#prepare prototype key file
key_proto = fvs_prototype_keyfile(invyr = "InvYear 2001", notriple=NULL)
#convert prototype key file into series of key files associated with each cn
df_keys = fvs_make_keyfiles(df_params, key_proto = key_proto, cluster = clus1, id="cn")
#lastly, actually run fvs
fvs_run(df_keys, cluster = clus1)
parallel::stopCluster(clus1)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.