ols | R Documentation |

`ols`

estimates gravity models in their traditional form
via Ordinary Least Squares (ols). It does not consider Multilateral
Resistance terms.

```
ols(
dependent_variable,
distance,
additional_regressors = NULL,
income_origin,
income_destination,
code_origin,
code_destination,
uie = FALSE,
robust = FALSE,
data,
...
)
```

`dependent_variable` |
(Type: character) name of the dependent variable. If If |

`distance` |
(Type: character) name of the distance variable that should be taken as the key independent variable in the estimation. The distance is logged automatically when the function is executed. |

`additional_regressors` |
(Type: character) names of the additional regressors to include in the model (e.g. a dummy variable to indicate contiguity). Unilateral metric variables such as GDPs can be added but those variables have to be logged first. Interaction terms can be added. Write this argument as |

`income_origin` |
(Type: character) origin income variable (e.g. GDP) in the dataset. |

`income_destination` |
(Type: character) destination income variable (e.g. GDP) in the dataset. |

`code_origin` |
(Type: character) country of origin variable (e.g. ISO-3 country codes). The variables are grouped using this parameter. |

`code_destination` |
(Type: character) country of destination variable (e.g. country ISO-3 codes). The variables are grouped using this parameter. |

`uie` |
(Type: logical) Dtermines whether the
parameters are to be estimated assuming unitary income elasticities. The default value is set
to |

`robust` |
(Type: logical) whether robust fitting should be used. By default this is set to |

`data` |
(Type: data.frame) the dataset to be used. |

`...` |
Additional arguments to be passed to the function. |

`ols`

estimates gravity models in their traditional, additive,
form via Ordinary Least Squares using the `lm`

function.
Multilateral Resistance terms are not considered by this function.

As the coefficients for the country's incomes were often found to be close to unitary and unitary income elasticities are in line with some theoretical foundations on international trade, it is sometimes assumed that the income elasticities are equal to unity.

In order to allow for the estimation with
and without the assumption of unitary income elasticities, the option
`uie`

is built into `ols`

with the default set to `FALSE`

.

`ols`

estimation can be used for both, cross-sectional and
panel data. Nonetheless, the function is designed to be consistent with the
Stata code for cross-sectional data provided at the website
Gravity Equations: Workhorse, Toolkit, and Cookbook
when choosing robust estimation.

The function `ols`

was therefore tested for cross-sectional data. For the use with panel data
no tests were performed. Therefore, it is up to the user to ensure that the functions can be applied
to panel data.

Depending on the panel dataset and the variables - specifically the type of fixed effects - included in the model, it may easily occur that the model is not computable. Also, note that by including bilateral fixed effects such as country-pair effects, the coefficients of time-invariant observables such as distance can no longer be estimated.

Depending on the specific model, the code of the respective function may has to be changed in order to exclude the distance variable from the estimation.

At the very least, the user should take special care with respect to the meaning of the estimated coefficients and variances as well as the decision about which effects to include in the estimation. When using panel data, the parameter and variance estimation of the models may have to be changed accordingly.

For a comprehensive overview of gravity models for panel data see \insertCiteEgger2003;textualgravity, \insertCiteGomez-Herrera2013;textualgravity and \insertCiteHead2010;textualgravity as well as the references therein.

The function returns the summary of the estimated gravity model as an
`lm`

-object.

For more information on gravity models, theoretical foundations and estimation methods in general see

\insertRefAnderson1979gravity

\insertRefAnderson2001gravity

\insertRefAnderson2010gravity

\insertRefBaier2009gravity

\insertRefBaier2010gravity

\insertRefFeenstra2002gravity

\insertRefHead2010gravity

\insertRefHead2014gravity

\insertRefSantos2006gravity

and the citations therein.

See Gravity Equations: Workhorse, Toolkit, and Cookbook for gravity datasets and Stata code for estimating gravity models.

For estimating gravity equations using panel data see

\insertRefEgger2003gravity

\insertRefGomez-Herrera2013gravity

and the references therein.

`lm`

, `coeftest`

,
`vcovHC`

```
# Example for CRAN checks:
# Executable in < 5 sec
library(dplyr)
data("gravity_no_zeros")
# Choose 5 countries for testing
countries_chosen <- c("AUS", "CHN", "GBR", "BRA", "CAN")
grav_small <- filter(gravity_no_zeros, iso_o %in% countries_chosen)
fit <- ols(
dependent_variable = "flow",
distance = "distw",
additional_regressors = c("rta", "contig", "comcur"),
income_origin = "gdp_o",
income_destination = "gdp_d",
code_origin = "iso_o",
code_destination = "iso_d",
uie = FALSE,
robust = FALSE,
data = grav_small
)
```

Embedding an R snippet on your website

Add the following code to your website.

For more information on customizing the embed code, read Embedding Snippets.