This functions assign input rates for the plots created by make_exp_plots() according to the rate designs specified by the user in rate_info, which can be created by prep_rateingle().
Arguments
- exp_data
experiment plots created by make_exp_plots()
- rate_info
rate information created by prep_rate()
Examples
#--- load experiment plots made by make_exp_plots() ---#
data(exp_data)
exp_data
#> # A tibble: 1 × 14
#> input_name unit_system field_sf headland exp_plots ab_lines harvest_ab_lines
#> <chr> <chr> <list> <list> <list> <list> <list>
#> 1 NH3 imperial <sf> <sf> <sf> <sf> <sf [1 × 2]>
#> # ℹ 7 more variables: plot_width <dbl>, harvester_width <dbl>,
#> # machine_width <dbl>, section_num <dbl>, headland_length <dbl>,
#> # side_length <dbl>, abline_type <chr>
#--- load rate information ---#
data(rate_info)
rate_info
#> # A tibble: 1 × 12
#> input_name design_type gc_rate unit tgt_rate_original tgt_rate_equiv min_rate
#> <chr> <chr> <dbl> <chr> <list> <list> <lgl>
#> 1 NH3 ls 30 gall… <dbl [5]> <dbl [5]> NA
#> # ℹ 5 more variables: max_rate <lgl>, num_rates <int>, rank_seq_ws <list>,
#> # rank_seq_as <list>, rate_jump_threshold <lgl>
#--- assign rates ---#
td <- assign_rates(exp_data, rate_info)
#--- visualization of the assigned rates ---#
viz(td)
