class: center, middle, inverse, title-slide # 1.4 — Ricardian One-Factor Model ## ECON 324 • International Trade • Fall 2020 ### Ryan Safner
Assistant Professor of Economics
safner@hood.edu
ryansafner/tradeF20
tradeF20.classes.ryansafner.com
--- class: inverse # Outline ## [Assumptions of the Ricardian One-Factor Model](#4) ## [Absolute and Comparative Advantages (Autarky)](#14) ## [An Example in Autarky](#20) ## [The Example with International Trade](#39) --- # A Note of Caution and A Judgment Call .pull-left[ .smallest[ - Feenstra and Taylor dive right into a Ricardian model in Ch. 2 with some advanced features; Ch. 4 is H-O Model - A lot of moving parts are thrown at you rather quickly - In my experience (and from using other textbooks), it's better to build up slowly: 1. Simplified Ricardian model 2. Standard "neoclassical model" (not in F&T) 3. H-O Model - So if you are reading the textbook, it won't exactly match up to class for 1-2 weeks 😕 ] ] .pull-right[ .center[ ![](../images/tradetextbook.jpg) ] ] --- class: inverse, center, middle # Assumptions of the Ricardian One-Factor Model --- # Assumptions of the One-Factor Model .pull-left[ .smaller[ 1. Markets (both output and factors) are perfectly competitive 2. “Labor” is homogenous and non-specific 3. Labor is mobile *domestically*, but *not internationally* 4. Production of goods requires only varying amounts of labor as an input - The “one factor” - The marginal product of labor is constant 5. No barriers to trade or transactions costs 6. Technology is constant within each country 7. Resource endowments are fixed ] ] .pull-right[ .center[ ![](../images/workers.png) ] ] --- # Setting up the Model .pull-left[ - Imagine 2 countries, .blue[Home] and .red[Foreign] - Each country can produce two goods, .pink[xylophones (x)] and .purple[yams (y)] - Each country has a fixed total supply of labor - `\(\color{blue}{L}\)` for .blue[Home] and `\(\color{red}{L'}\)` for .red[Foreign] - Let: - `\(\color{magenta}{l_x}\)`: amount of labor to make 1 `\(\color{magenta}{x}\)` - `\(\color{purple}{l_y}\)`: amount of labor to make 1 `\(\color{purple}{y}\)` ] .pull-right[ .center[ ![](../images/workers.png) ] ] --- # Setting up the Model: Home .pull-left[ - .blue[Home's] .hi[production set] and total possible allocations of labor within a country is: `$$l_x x + l_y y \leq L$$` - To find the .hi[frontier (PPF)], assume Labor Demand (left) and Labor Supply (right) are equal: `$$l_x x + l_y y = L$$` ] .pull-right[ ] --- # Setting up the Model: Home .pull-left[ `$$l_x x + l_y y = L$$` - Solve for y to graph `$$y=\frac{L}{l_y}-\frac{l_x}{l_y}x$$` ] .pull-right[ <img src="1.4-slides_files/figure-html/BC-plot0-1.png" width="432" style="display: block; margin: auto;" /> ] --- # Setting up the Model: Home .pull-left[ `$$l_x x + l_y y = L$$` - Solve for y to graph `$$y=\frac{L}{l_y}-\frac{l_x}{l_y}x$$` - `\(y\)`-intercept: `\(\frac{L}{l_y}\)` (max y production) - `\(x\)`-intercept: `\(\frac{L}{l_x}\)` (max x production) ] .pull-right[ <img src="1.4-slides_files/figure-html/BC-plot1-1.png" width="432" style="display: block; margin: auto;" /> ] --- # Setting up the Model: Home .pull-left[ `$$l_x x + l_y y = L$$` - Solve for y to graph `$$y=\frac{L}{l_y}-\frac{l_x}{l_y}x$$` - `\(y\)`-intercept: `\(\frac{L}{l_y}\)` (max y production) - `\(x\)`-intercept: `\(\frac{L}{l_x}\)` (max x production) - slope: `\(-\frac{l_x}{l_y}\)` ] .pull-right[ <img src="1.4-slides_files/figure-html/BC-plot2-1.png" width="432" style="display: block; margin: auto;" /> ] --- # Setting up the Model: Home .pull-left[ `$$l_x x + l_y y = L$$` - Solve for y to graph `$$y=\frac{L}{l_y}-\frac{l_x}{l_y}x$$` - `\(y\)`-intercept: `\(\frac{L}{l_y}\)` (max y production) - `\(x\)`-intercept: `\(\frac{L}{l_x}\)` (max x production) - slope: `\(-\frac{l_x}{l_y}\)` ] .pull-right[ <img src="1.4-slides_files/figure-html/BC-plot3-1.png" width="432" style="display: block; margin: auto;" /> ] --- # Same As Before .pull-left[ .smallest[ - Points .hi-blue[on the frontier] are efficient (uses all available labor supply) - Points .hi-green[beneath the frontier] are feasible (in .hi-green[production set]) but inefficient (does not use all available labor supply) - Points .hi-red[above the frontier] are impossible with current constraints (labor supply, technology, trading opportunities) ] ] .pull-right[ <img src="1.4-slides_files/figure-html/unnamed-chunk-1-1.png" width="504" style="display: block; margin: auto;" /> ] --- # Understanding the Tradeoff .pull-left[ - Slope of PPF: .hi[marginal rate of transformation (MRT)] - Rate at which (domestic) market values .hi-purple[tradeoff] between goods x and y - .hi-purple[Relative price of x] (in terms of y), or .hi-purple[opportunity cost of x]: how many units of y must be given up to produce one more unit of x ] .pull-right[ <img src="1.4-slides_files/figure-html/unnamed-chunk-2-1.png" width="504" style="display: block; margin: auto;" /> ] --- class: inverse, center, middle # Absolute and Comparative Advantages (Autarky) --- # Absolute Advantage .pull-left[ - A country has an .hi-purple[absolute advantage] if it requires less labor to produce (a unit of) a good - .hi-green[Examples:] - if `\(\color{blue}{l_x} < \color{red}{l_x'}\)`, then .blue[Home] has an absolute advantage in producing x - if `\(\color{blue}{l_y} > \color{red}{l_y'}\)`, then .red[Foreign] has an absolute advantage in producing *y* ] .pull-right[ .center[ ![](../images/absoluteadvantage.jpg) ] ] --- # *Comparative* Advantage .pull-left[ .smallest[ - A country has a .hi[*comparative* advantage] in a producing a good if the opportunity cost of producing that good is *lower* than other countries - Recall the slope of PPF (the MRT) is the relative price (opp. cost) of `\(x\)` - .hi-green[Examples:] - if `\(\color{blue}{\frac{l_x}{l_y}} < \color{red}{\frac{l_x'}{l_y'}}\)`, then .blue[Home] has a comparative advantage in producing x - if `\(\color{blue}{\frac{l_x}{l_y}} > \color{red}{\frac{l_x'}{l_y'}}\)`, then .red[Foreign] has a comparative advantage in producing x ] ] .pull-right[ .center[ ![](../images/absoluteadvantage.jpg) ] ] --- # *Comparative* Advantage, Some Hints - PPF slope `\(=\)` opportunity cost of good x (amount of y given up per 1 x) - If countries have different PPF slopes, have different opportunity costs -- - Country with .hi[flatter slope (smaller magnitude)] has .hi[lower opportunity cost of x] (or .hi-purple[higher cost of y]) implies a .hi[comparative advantage in x] -- - Country with .hi-purple[steeper slope (larger magnitude)] has .hi[higher opportunity cost of x] (or .hi-purple[lower cost of y)] implies a .hi-purple[comparative advantage in y] --- class: inverse, center, middle # An Example in Autarky --- # Ricardian One-Factor Model Example .pull-left[ .content-box-green[ .hi-green[Example]: Suppose the following facts to set up: - .blue[Home] has 100 Laborers - Requires 1 worker to make .pink[x] - Requires 2 workers to make .purple[y] - .red[Foreign] has 100 Laborers - Requires 1 worker to make .pink[x] - Requires 4 workers to make .purple[y] ] ] -- .pull-right[ 1. For each country, find the equation of the PPF and graph it. 2. Which country has an *absolute* advantage in producing `\(x\)` and `\(y\)`? 3. Which country has an *comparative* advantage in producing `\(x\)` and `\(y\)`? ] --- # Ricardian One-Factor Model Example: Solving for PPFs .pull-left[ ### .hi-blue[Home] `$$\begin{align*} l_xx+l_yy & =L\\ \end{align*}$$` ] .pull-right[ ### .hi-red[Foreign] ] --- # Ricardian One-Factor Model Example: Solving for PPFs .pull-left[ ### .hi-blue[Home] `$$\begin{align*} l_xx+l_yy & =L\\ 1x+2y & = 100 \\ \end{align*}$$` ] .pull-right[ ### .hi-red[Foreign] ] --- # Ricardian One-Factor Model Example: Solving for PPFs .pull-left[ ### .hi-blue[Home] `$$\begin{align*} l_xx+l_yy & =L\\ 1x+2y & = 100 \\ 2y &= 100 - x \\ \end{align*}$$` ] .pull-right[ ### .hi-red[Foreign] ] --- # Ricardian One-Factor Model Example: Solving for PPFs .pull-left[ ### .hi-blue[Home] `$$\begin{align*} l_xx+l_yy & =L\\ 1x+2y & = 100 \\ 2y &= 100 - x \\ y &= 50 - 0.5x \\ \end{align*}$$` ] .pull-right[ ### .hi-red[Foreign] ] --- # Ricardian One-Factor Model Example: Solving for PPFs .pull-left[ ### .hi-blue[Home] `$$\begin{align*} l_xx+l_yy & =L\\ 1x+2y & = 100 \\ 2y &= 100 - x \\ y &= 50 - 0.5x \\ \end{align*}$$` ] .pull-right[ ### .hi-red[Foreign] `$$\begin{align*} l_x'x+l_y'y & =L'\\ \end{align*}$$` ] --- # Ricardian One-Factor Model Example: Solving for PPFs .pull-left[ ### .hi-blue[Home] `$$\begin{align*} l_xx+l_yy & =L\\ 1x+2y & = 100 \\ 2y &= 100 - x \\ y &= 50 - 0.5x \\ \end{align*}$$` ] .pull-right[ ### .hi-red[Foreign] `$$\begin{align*} l_x'x+l_y'y & =L'\\ 1x+4y &= 100\\ \end{align*}$$` ] --- # Ricardian One-Factor Model Example: Solving for PPFs .pull-left[ ### .hi-blue[Home] `$$\begin{align*} l_xx+l_yy & =L\\ 1x+2y & = 100 \\ 2y &= 100 - x \\ y &= 50 - 0.5x \\ \end{align*}$$` ] .pull-right[ ### .hi-red[Foreign] `$$\begin{align*} l_x'x+l_y'y & =L'\\ 1x+4y &= 100\\ 4y &= 100 - x\\ \end{align*}$$` ] --- # Ricardian One-Factor Model Example: Solving for PPFs .pull-left[ ### .hi-blue[Home] `$$\begin{align*} l_xx+l_yy & =L\\ 1x+2y & = 100 \\ 2y &= 100 - x \\ y &= 50 - 0.5x \\ \end{align*}$$` ] .pull-right[ ### .hi-red[Foreign] `$$\begin{align*} l_x'x+l_y'y & =L'\\ 1x+4y &= 100\\ 4y &= 100 - x\\ y &= 25 - 0.25x\\ \end{align*}$$` ] --- # Ricardian One-Factor Model Example: Graphing PPFs .pull-left[ ### .hi-blue[Home] <img src="1.4-slides_files/figure-html/unnamed-chunk-3-1.png" width="504" style="display: block; margin: auto;" /> `$$\color{blue}{y = 50 - 0.5x}$$` ] .pull-right[ ### .hi-red[Foreign] <img src="1.4-slides_files/figure-html/unnamed-chunk-4-1.png" width="504" style="display: block; margin: auto;" /> `$$\color{red}{y=25-0.25x}$$` ] --- # Example: Absolute Advantage .pull-left[ ### .hi-blue[Home] <img src="1.4-slides_files/figure-html/unnamed-chunk-5-1.png" width="504" style="display: block; margin: auto;" /> .center[ `\(\color{blue}{l_x}=1\)` `\(\color{blue}{l_y}=2\)` ] ] .pull-right[ ### .hi-red[Foreign] <img src="1.4-slides_files/figure-html/unnamed-chunk-6-1.png" width="504" style="display: block; margin: auto;" /> .center[ `\(\color{blue}{l_x'}=1\)` `\(\color{blue}{l_y'}=4\)` ] ] --- # Example: Absolute Advantage .pull-left[ ### .hi-blue[Home] <img src="1.4-slides_files/figure-html/unnamed-chunk-7-1.png" width="504" style="display: block; margin: auto;" /> .center[ `\(\color{blue}{l_x}=1\)` (Equal) `\(\color{blue}{l_y}=2\)` (.hi[Absolute advantage]) ] ] .pull-right[ ### .hi-red[Foreign] <img src="1.4-slides_files/figure-html/unnamed-chunk-8-1.png" width="504" style="display: block; margin: auto;" /> .center[ `\(\color{blue}{l_x'}=1\)` (Equal) `\(\color{blue}{l_y'}=4\)` (Absolute disadvantage) ] ] --- # Comparative Advantage and Autarky Relative Prices .pull-left[ - So far, we assume countries are in .hi[autarky], they are not trading with one another - To find .hi[comparative advantage] for each country, we need to compare .hi-purple[opportunity costs] of producing each good in each country, or .hi-purple[relative prices in autarky] - A country with a .hi-turquoise[lower autarky relative price of a good] than another country has a comparative advantage in producing that good ] .pull-right[ .center[ ![:scale 100%](../images/citybubble.jpg) ] ] --- # Example: Comparative Advantage .pull-left[ ### .hi-blue[Home] <img src="1.4-slides_files/figure-html/unnamed-chunk-9-1.png" width="504" style="display: block; margin: auto;" /> Autarky relative price of .pink[x]: 0.5.purple[y] [PPF slope!] Autarky relative price of .purple[y]: 2.pink[x] ] .pull-right[ ### .hi-red[Foreign] <img src="1.4-slides_files/figure-html/unnamed-chunk-10-1.png" width="504" style="display: block; margin: auto;" /> Autarky relative price of .pink[x]: 0.25.purple[y] [PPF slope!] Autarky relative price of .purple[y]: 4.pink[x] ] --- # Example: Comparative Advantage .pull-left[ .center[ Autarky Relative Prices (Opportunity Costs) ] | | .pink[1x] | .purple[1y] | |----|-----:|--------:| | .blue[Home] | 0.5y | 2x | | .red[Foreign] | 0.25y | 4x | ] -- .pull-right[ - .blue[Home] has a comparative advantage in producing .purple[y] - .red[Foreign] has a comparative advantage in producing .pink[x] ] --- # Example: Opening up Trade .pull-left[ .center[ Autarky Relative Prices (Opportunity Costs) ] | | .pink[1x] | .purple[1y] | |----|-----:|--------:| | .blue[Home] | 0.5y | .b[2x] | | .red[Foreign] | .b[0.25y] | 4x | ] .pull-right[ - Suppose now countries open up trade - We considered the relative prices .hi[in autarky] - We next need to consider what might relative prices be .hi[under international trade] ] --- class: inverse, center, middle # The Example with International Trade --- # Example: Opening up Trade .pull-left[ .center[ Autarky Relative Prices (Opportunity Costs) ] | | .pink[1x] | .purple[1y] | |----|-----:|--------:| | .blue[Home] | 0.5y | .b[2x] | | .red[Foreign] | .b[0.25y] | 4x | ] .pull-right[ .quitesmall[ - A bit of handwaiving here: - Ricardo assumes a .hi[labor theory of value] and constant marginal products of labor - We have hidden the `\(MPL\)`<sup>.magenta[†]</sup> for simplicity here - We are also in direct exchange (barter) between goods, there is no money here - Suffice it to say that we can show that the ratio of labor requirements (PPF slope) is equal to the ratio of prices of the final goods: `$$\underbrace{\frac{l_x}{l_y}}_{slope}=\frac{p_x}{p_y}$$` - a clearer explanation of this with our next model! ] ] --- # Example: Opening up Trade .pull-left[ .center[ Autarky Relative Prices (Opportunity Costs) ] | | .pink[1x] | .purple[1y] | |----|-----:|--------:| | .blue[Home] | 0.5y | .b[2x] | | .red[Foreign] | .b[0.25y] | 4x | ] .pull-right[ .smaller[ - .blue[Home] will: - buy .pink[x] if `\(p_x < 0.5y\)` - sell .purple[y] if `\(p_y > 2x\)` - The autarky price of .purple[y]: - At .blue[Home]: 2x - In .red[Foreign]: 4x - .blue[Home] can export .purple[y] to .red[Foreign] and sell at higher price! - All .blue[L] in .blue[Home] will move to (higher-paying) .purple[y] industry ] ] --- # Example: Opening up Trade .pull-left[ .center[ Autarky Relative Prices (Opportunity Costs) ] | | .pink[1x] | .purple[1y] | |----|-----:|--------:| | .blue[Home] | 0.5y | .b[2x] | | .red[Foreign] | .b[0.25y] | 4x | ] .pull-right[ .smaller[ - .red[Foreign] will: - sell .pink[x] if `\(p_x > 0.25y\)` - buy .purple[y] if `\(p_y < 4x\)` - The autarky price of .pink[x]: - At .blue[Home]: 0.5y - In .red[Foreign]: 0.25y - .red[Foreign] can export .pink[x] to .home[Home] and sell at higher price! - All .red[L'] in .red[Foreign] will move to (higher-paying) .pink[x] industry ] ] --- # Example: Opening up Trade .pull-left[ .center[ Autarky Relative Prices (Opportunity Costs) ] | | .pink[1x] | .purple[1y] | |----|-----:|--------:| | .blue[Home] | 0.5y | .b[2x] | | .red[Foreign] | .b[0.25y] | 4x | ] .pull-right[ Possible range of .hi[*world* relative prices]: `$$\color{purple}{0.25y} < \color{magenta}{p_x} < \color{purple}{0.5 y}$$` `$$\color{magenta}{2x} < \color{purple}{p_y} < \color{magenta}{4x}$$` ] --- # Example: Specialization .pull-left[ ### .hi-blue[Home] <img src="1.4-slides_files/figure-html/unnamed-chunk-11-1.png" width="504" style="display: block; margin: auto;" /> .blue[Home] specializes in only producing .purple[y] at point A ] .pull-right[ ### .hi-red[Foreign] <img src="1.4-slides_files/figure-html/unnamed-chunk-12-1.png" width="504" style="display: block; margin: auto;" /> .red[Foreign] specializes in only producing .pink[x] at point A' ] --- # International Trade Equilibrium: Price Adjustments - .blue[Home] exports .purple[y] `\(\implies\)` *less* .purple[y] sold in .blue[Home] `\(\implies\)` `\(\uparrow p_y\)` in .blue[Home] -- - As .purple[y] arrives in .red[Foreign] `\(\implies\)` *more* .purple[y] sold in .red[Foreign] `\(\implies\)` `\(\downarrow p_y\)` in .red[Foreign] -- - .red[Foreign] exports .pink[x] `\(\implies\)` *less* .pink[x] sold in .red[Foreign] `\(\implies\)` `\(\uparrow p_x\)` in .red[Foreign] -- - As .pink[x] arrives in .blue[Home] `\(\implies\)` *more* .pink[x] sold in .blue[Home] `\(\implies\)` `\(\downarrow p_x\)` in .blue[Home] --- # International Trade Equilibrium: World Relative Prices .pull-left[ .smallest[ - .hi-turquoise[International trade equilibrium]: relative prices adjust so they .hi-turquoise[equalize across countries] `$$\frac{p_x^{\star}}{p_y^{\star}} = \frac{p_x}{p_y} = \frac{p_x'}{p_y'}$$` - Must be within mutally agreeable range: `$$\color{purple}{0.25y} < \color{magenta}{p_x} < \color{purple}{0.5 y}$$` `$$\color{magenta}{2x} < \color{purple}{p_y} < \color{magenta}{4x}$$` - .hi-turquoise[Suppose the world relative price of x settles to `\\(\frac{p_x^{\star}}{p_y^{\star}}=0.4y\\)`] ] ] .pull-right[ .center[ ![](../images/scale.png) ] ] --- # International Trade Equilibrium: World Relative Prices .pull-left[ ### .hi-blue[Home] <img src="1.4-slides_files/figure-html/unnamed-chunk-13-1.png" width="504" style="display: block; margin: auto;" /> ] .pull-right[ ### .hi-red[Foreign] <img src="1.4-slides_files/figure-html/unnamed-chunk-14-1.png" width="504" style="display: block; margin: auto;" /> ] World relative price of x: `\(\frac{p_x^{\star}}{p_y^{\star}}=0.4y\)` Both countries face same .hi[international exchange rate] with slope `\(= -0.4\)` --- # International Trade Equilibrium: “Trade Triangles” .pull-left[ ### .hi-blue[Home] <img src="1.4-slides_files/figure-html/unnamed-chunk-15-1.png" width="504" style="display: block; margin: auto;" /> .blue[Home] exports .purple[20y] to .red[Foreign] ] .pull-right[ ### .hi-red[Foreign] <img src="1.4-slides_files/figure-html/unnamed-chunk-16-1.png" width="504" style="display: block; margin: auto;" /> ] --- # International Trade Equilibrium: “Trade Triangles” .pull-left[ ### .hi-blue[Home] <img src="1.4-slides_files/figure-html/unnamed-chunk-17-1.png" width="504" style="display: block; margin: auto;" /> .blue[Home] exports .purple[20y] to .red[Foreign] .red[Foreign] exports .pink[50x] to .blue[Home] ] .pull-right[ ### .hi-red[Foreign] <img src="1.4-slides_files/figure-html/unnamed-chunk-18-1.png" width="504" style="display: block; margin: auto;" /> ] --- # International Trade Equilibrium: “Trade Triangles” .pull-left[ ### .hi-blue[Home] <img src="1.4-slides_files/figure-html/unnamed-chunk-19-1.png" width="504" style="display: block; margin: auto;" /> ] .pull-right[ ### .hi-red[Foreign] <img src="1.4-slides_files/figure-html/unnamed-chunk-20-1.png" width="504" style="display: block; margin: auto;" /> ] Trade along .b[world exchange rate] (world relative prices) from specialization points (A and A') to consumption points (B and B') beyond PPFs! --- # Another Example: You Try! .pull-left[ .content-box-green[ .smaller[ .hi-green[Example]: Suppose the following facts to set up: - .blue[Home] has 100 Laborers - Requires 5 workers to make .pink[wheat] - Requires 10 workers to make .purple[cars] - .red[Foreign] has 200 Laborers - Requires 2 workers to make .pink[wheat] - Requires 8 workers to make .purple[cars] Plot wheat (w) on the horizontal axis and cars (c) on the vertical axis. ] ] ] .pull-right[ 1. For each country, find the equation of the PPF and graph it. 2. Which country has an *absolute* advantage in producing wheat and cars? 3. Which country has an *comparative* advantage in producing wheat and cars? 4. What will the range of possible terms of trade be? ]