fvs_protype_params: make template parameter data.frame

View source: R/fvs_protype_params.R

fvs_protype_paramsR Documentation

make template parameter data.frame

Description

make keyfiles for each row in the input data frame

Usage

fvs_protype_params(add_params = NULL)

Arguments

add_params

optional substitution parameters, but must match substitution in keyfile using @somekey@

Details

make keyfiles for each row in the input data frame


Revision History

1.0 2021 Oct 15 Created

Value

data.frame with parameters for FVS key files

Author(s)

Jacob Strunk <someone@somewhere.com>

See Also

fvs_run
fvs_keyfile_prototype

Examples


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)





jstrunk001/RForInvt documentation built on April 17, 2025, 5:02 p.m.