R/gen_tec_xml.R
gen_tec_xml.Rd
Generate STICS tec xml file(s) from a template or an input file
gen_tec_xml(
param_df = NULL,
file = NULL,
out_dir,
stics_version = "latest",
na_values = NA,
param_table = lifecycle::deprecated(),
tec_in_file = lifecycle::deprecated(),
out_path = lifecycle::deprecated()
)
A table (df, tibble) containing the values of the parameters to use (see details)
Path of a tec xml file to be used as a template. Optional, if not provided, the function will use a standard template depending on the STICS version.
Path of the directory where to generate the file(s).
Name of the STICS version. Optional, used if
the file
argument is not provided. In this case the function uses a
standard template associated to the STICS version.
value to use as missing value in param_table (optional, default : NA)
None
Please see get_stics_versions_compat()
for the full list of
STICS versions that can be used for the
argument stics_version
.
param_df
is a data.frame
with the following format:
Tec_name | julres_1 | coderes_1 |
USM_2017_T1_CI_tec.xml | NA | 1 |
BIN_CANPC_05_SEC_220-0-0_34K_CANPC05T3_Q_tec.xml | 110 | 1 |
BIN_AGT_04_IRR_220-0-0_33K_AGT04T2_Q_tec.xml | 73 | 1 |
AGA_ARB_13_IRR_220-0-0_37K_ARB13_C_tec.xml | 82 | 1 |
AGA_ARB_13_SEC_220-0-0_37K_ARB13_C_tec.xml | 82 | 1 |
FRA_ARB_11_SEC_220-0-0_38K_E_tec.xml | 70 | 1 |
MAG_ARB_09_SEC_220-0-0_38K_E_tec.xml | 81 | 1 |
MAG_ARV_12_IRR_220-0-0_36K_ARV12_C_tec.xml | 100 | 1 |
MAG_ARV_12_SEC_220-0-0_36K_ARV12_C_tec.xml | 100 | 1 |
FRA_ARB_12_SEC_220-0-0_31K_ARB12_C_tec.xml | 92 | 1 |
FRA_ARB_13_SEC_220-0-0_37K_ARB13_C_tec.xml | 82 | 1 |
The first column gives the tec file name (to be generated), all following columns give the parameter value to put in the file, and each line denotes a separate tec file (for e.g. several USMs).
The first column name must contain the keyword tec or Tec or TEC as a prefix to be detected (as shown in the table extract above).
If not given (the default, NULL
), the function returns the template as is.
xl_path <- download_usm_xl(file = "inputs_stics_example.xlsx")
#> Warning: inputs_stics_example.xlsx already exists in /var/folders/1y/56hdyx6x0_jb18k7b4ys9b6w0000gn/T//Rtmp6TMon6
#> Consider to set overwrite = TRUE to overwrite (it | them )
tec_param_df <- read_params_table(file = xl_path, sheet_name = "Tec")
gen_tec_xml(out_dir = tempdir(), param_df = tec_param_df[1:2, ])