Fits CES boundary models

The boundary models are given in Table 2 of Heun, et al "An Empirical Investigation of the Role of Energy in Economic Growth"

cesBoundaryModels(formula, data, nest, method = "nlm", subset = TRUE)

Arguments

formula	a CES formula in the form y ~ a + b + c + d + time
data	historical time series data
nest	a permutation of the integers 1 to the number of factors describing how to nest and permute the variables in the formula.

Value

a list of boundary models.

Examples

if (require(EconData) & require(dplyr)) {
  cesBoundaryModels(iGDP ~ iK + iL + iQp + iYear, data=Calvin %>% filter(Country=="US"), nest=c(1,2,3))
  cesBoundaryModels(iGDP ~ iK + iL + iQp + iYear, data=Calvin %>% filter(Country=="US"), nest=c(2,3,1))
  cesBoundaryModels(iGDP ~ iK + iL + iYear, data=Calvin %>% filter(Country=="US"), nest=c(1,2))
  }
#> Loading required package: EconData
#> Warning: there is no package called ‘EconData’
#> Loading required package: dplyr
#> 
#> Attaching package: ‘dplyr’
#> The following object is masked from ‘package:testthat’:
#> 
#>     matches
#> The following objects are masked from ‘package:stats’:
#> 
#>     filter, lag
#> The following objects are masked from ‘package:base’:
#> 
#>     intersect, setdiff, setequal, union