Is LAI forced for usms in usms.xml

get_lai_forcing(usm_file_path, usms_list = c())

Arguments

usm_file_path

Path to usms.xml file

usms_list

Usm(s) name(s) (optional, see details)

Value

A named numeric vector with a Boolean value (TRUE = forced) for each usm

Details

Use get_usms_list() to get the list of the usm names for an usms.xml file.

Examples

# Xml case
xml_usms <- file.path(get_examples_path(file_type = "xml"), "usms.xml")
get_lai_forcing(xml_usms)
#>            SugarCane               potato               banana 
#>                FALSE                FALSE                FALSE 
#>              sorghum            sugarbeet                wheat 
#>                FALSE                FALSE                FALSE 
#>                maize              soybean              lettuce 
#>                FALSE                FALSE                FALSE 
#>               tomato           DurumWheat             rapeseed 
#>                FALSE                FALSE                FALSE 
#>            sunflower                grass             BareSoil 
#>                FALSE                FALSE                FALSE 
#>          demo_Wheat1       demo_BareSoil2          demo_maize3 
#>                FALSE                FALSE                FALSE 
#>    DurumWheat_4years         maize_4years           strawberry 
#>                FALSE                FALSE                FALSE 
#>                 vine               fescue                 flax 
#>                FALSE                FALSE                FALSE 
#> intercrop_pea_barley              timothy      DurumWheat_snow 
#>                FALSE                FALSE                FALSE 
#>             Turmeric        cc_BristleOat           cc_mustard 
#>                FALSE                FALSE                FALSE 
#>   cc_ItalianRyegrass             cc_vetch     cc_CrimsonClover 
#>                FALSE                FALSE                FALSE 
#>           proto_rice      Miscanthus_2006      Miscanthus_2007 
#>                FALSE                FALSE                FALSE 
#>      Miscanthus_2008      Miscanthus_2009      Miscanthus_2010 
#>                FALSE                FALSE                FALSE 
#>      Miscanthus_2011      Miscanthus_2012      Miscanthus_2013 
#>                FALSE                FALSE                FALSE 
#>      Miscanthus_2014      Miscanthus_2015 
#>                FALSE                FALSE 
get_lai_forcing(xml_usms, "wheat")
#> wheat 
#> FALSE 
get_lai_forcing(xml_usms, c("wheat", "intercrop_pea_barley"))
#>                wheat intercrop_pea_barley 
#>                FALSE                FALSE