Description Usage Arguments Author(s) References Examples
View source: R/MWG_Varian_examples.R
This is Exercise 15.B.9 in MWG (1995, P541), which is a pure exchange 2-by-2 economy.
1 2 3 4 5 6 | Example.MWG.Exercise.15.B.9(
S0Exg = matrix(c(
30, 0,
0, 20
), 2, 2, TRUE)
)
|
S0Exg |
an exogenous supply matrix, which will be passed to the function sdm. |
LI Wu <liwu@staff.shu.edu.cn>
LI Wu (2019, ISBN: 9787521804225) General Equilibrium and Structural Dynamics: Perspectives of New Structural Economics. Beijing: Economic Science Press. (In Chinese)
Mas-Colell, Andreu and Whinston, Michael Dennis and Green, Jerry R. (1995, ISBN: 0195073401) Microeconomic Theory. Oxford University Press (New York).
1 2 3 4 5 6 7 8 | Example.MWG.Exercise.15.B.9()
#####
S <- matrix(c(
5, 0,
0, 20
), 2, 2, TRUE)
Example.MWG.Exercise.15.B.9(S0Exg = S)
|
tolCond: 1e-05
Iteration number 1 : tolerance coefficient 3.77668293912394e-19
$tolerance
[1] 3.776683e-19
$p
[1] 2.668521e-18 1.000000e+00
$z
[1] 1.025588e-17 3.843282e+00
$S
[,1] [,2]
[1,] 30 0
[2,] 0 20
$A
result1 result2
[1,] 1 1.000000
[2,] 1 3.843282
tolCond: 1e-05
Iteration number 1 : tolerance coefficient 2.22044604925031e-16
$tolerance
[1] 2.220446e-16
$p
[1] 1.000000e+00 3.607399e-16
$z
[1] 5.0000e+00 1.8037e-15
$S
[,1] [,2]
[1,] 5 0
[2,] 0 20
$A
result1 result2
[1,] 1 1.0000e+00
[2,] 1 1.8037e-15
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.