shock_over_market: Analize a market after a shock:
In AlexB4891/phenomenology: What the Package Does (One Line, Title Case)

shock_over_market

R Documentation

Analize a market after a shock:

Analize a market after a shock:

shock_over_market(
  market,
  curve,
  shock_name = "Tax",
  p_delta = 0.15,
  q_delta = 0,
  slope_change = 0,
  percent = TRUE
)

`market`	A simple market with supply and demand produced by `create_market` function. The element is a list of class market_curves
`curve`	String with the curve(s) name that get the shock. Use "demand" or "supply"
`shock_name`	A name from the shock. Default value: "Tax"
`p_delta`	`p_delta` and `q_delta` works together with the `percent` argument. If `percent` is `TRUE` then all prices are multiplied by the value declared. Otherwise if `percent` is `FALSE` the curve moves in or out by a constant value.
`q_delta`	p_delta `p_delta` and `q_delta` works together with the `percent` argument. If `percent` is `TRUE` then all prices are multiplied by the value declared. Otherwise if `percent` is `FALSE` the curve moves in or out by a constant value.
`slope_change`	To wich value the slope of the curve should change.
`percent`	If the shock is a percentage (15% tax over supply) use `TRUE`, else, a constant is summed to the curve.

List with:

Original market plot
Income and substitution effect plot
Consumer and producer surplus before shock
Consumer and producer surplus after shock
Table with
- Elasticities at equilibrium (before and after)
- Surplus (before and after)
- Income and substitution effect