Match solarModel parameters in vector form

solarModel_match_params(vec_params, params)

Note

Version 1.0.0.

Examples

model = solarModel$new(spec)
model$fit()
#> No outliers!
vec_params <- c(theta = 1, alpha1 = 10)
solarModel_match_params(vec_params, model$coefficients)
#> ! Parameter: "theta" not found in the model specification. Ignored!
#> $location
#> # A tibble: 1 × 5
#>   place   target   lat   lon   alt
#>   <chr>   <chr>  <dbl> <dbl> <dbl>
#> 1 Bologna GHI     44.5  11.3    71
#> 
#> $params
#> # A tibble: 1 × 2
#>      alpha  beta
#>      <dbl> <dbl>
#> 1 0.000879 0.923
#> 
#> $seasonal_model_Ct
#> # A tibble: 1 × 4
#>   delta_0 delta_extra_1 delta_sin_1_365 delta_cos_1_365
#>     <dbl>         <dbl>           <dbl>           <dbl>
#> 1   -1.88          1.05         -0.0369           0.920
#> 
#> $seasonal_model_Yt
#> # A tibble: 1 × 3
#>       a_0 a_sin_1_365 a_cos_1_365
#>     <dbl>       <dbl>       <dbl>
#> 1 -0.0434     -0.0605      -0.331
#> 
#> $ARMA
#> # A tibble: 1 × 3
#>   intercept phi_1 theta_1
#>       <dbl> <dbl>   <dbl>
#> 1         0 0.450 -0.0664
#> 
#> $seasonal_variance
#> # A tibble: 1 × 3
#>     c_0 c_sin_1_365 c_cos_1_365
#>   <dbl>       <dbl>       <dbl>
#> 1 0.708      0.0750       0.366
#> 
#> $GARCH
#> # A tibble: 1 × 3
#>   omega alpha1 beta1
#>   <dbl>  <dbl> <dbl>
#> 1 0.722     10 0.160
#> 
#> $NM_mu_up
#> # A tibble: 1 × 12
#>    mu1_1  mu1_2  mu1_3  mu1_4 mu1_5  mu1_6  mu1_7  mu1_8  mu1_9 mu1_10 mu1_11
#>    <dbl>  <dbl>  <dbl>  <dbl> <dbl>  <dbl>  <dbl>  <dbl>  <dbl>  <dbl>  <dbl>
#> 1 -0.554 -0.586 -0.810 -0.712 -1.02 -0.998 -0.754 -0.686 -0.846 -0.933 -0.908
#> # ℹ 1 more variable: mu1_12 <dbl>
#> 
#> $NM_mu_dw
#> # A tibble: 1 × 12
#>   mu2_1 mu2_2 mu2_3 mu2_4 mu2_5 mu2_6 mu2_7 mu2_8 mu2_9 mu2_10 mu2_11 mu2_12
#>   <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl>  <dbl>  <dbl>  <dbl>
#> 1 0.671 0.658 0.532 0.549 0.401 0.366 0.452 0.489 0.504  0.479  0.673  0.747
#> 
#> $NM_sd_up
#> # A tibble: 1 × 12
#>   sd1_1 sd1_2 sd1_3 sd1_4 sd1_5 sd1_6 sd1_7 sd1_8 sd1_9 sd1_10 sd1_11 sd1_12
#>   <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl>  <dbl>  <dbl>  <dbl>
#> 1 0.885  1.11  1.10  1.06  1.23  1.16  1.06  1.17  1.12   1.16  0.829  0.943
#> 
#> $NM_sd_dw
#> # A tibble: 1 × 12
#>   sd2_1 sd2_2 sd2_3 sd2_4 sd2_5 sd2_6 sd2_7 sd2_8 sd2_9 sd2_10 sd2_11 sd2_12
#>   <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl>  <dbl>  <dbl>  <dbl>
#> 1 0.474 0.375 0.459 0.415 0.497 0.492 0.372 0.358 0.425  0.482  0.531  0.470
#> 
#> $NM_p_up
#> # A tibble: 1 × 12
#>    p1_1  p1_2  p1_3  p1_4  p1_5  p1_6  p1_7  p1_8  p1_9 p1_10 p1_11 p1_12
#>   <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl>
#> 1 0.542 0.521 0.356 0.443 0.381 0.308 0.301 0.327 0.342 0.399 0.496 0.653
#>