schema: EconSchema
aspectRatio: 1.3
params:
- name: a
value: 0.6
min: 0
max: 1
round: 0.1
- name: w
value: 5
min: 5
max: 10
round: 0.1
- name: r
value: 3.125
min: 1.6
max: 10
round: 0.1
- name: p
value: 7.5
min: 5
max: 10
round: 0.1
calcs:
L: (((params.p)*(1-params.a)*(60^(params.a)/(params.w)))^(1/(params.a)))
pi1: (params.p*(60^(params.a))*(calcs.L)^(1-params.a)-(calcs.L*params.w)-(60*params.r))
Y: ((60^(params.a))*(calcs.L)^(1-params.a))
W: (params.p)(1-params.a)*(60^(params.a))/(200^(params.a))
Yf: (60^(params.a))*(200)^(1-params.a)
isolucro2: ((calcs.pi1/params.p)+((params.w)*(calcs.L+60)/(params.p))+((params.r)*60/params.p))
layout:
TwoVerticalGraphsPlusSidebar:
topGraph:
xAxis:
min: 0
max: 200
ticks: 4
yAxis:
min: 0
max: 120
ticks: 4
objects:
#Função de Produção de Curto-prazo
- Curve:
fn: "(60^(params.a))*(x)^(1-params.a)"
ind: x
min: 0
max: 200
color: red
strokeWidth: 3.5
samplePoints: 300
#Função de Isolucro
- Curve:
fn: "((calcs.pi1/params.p)+((params.w)*x/(params.p))+((params.r)*60/params.p))"
ind: x
min: 0
max: calcs.L+70
color: grey
strokeWidth: 3.5
samplePoints: 300
- Segment:
a: [0,120]
b: [0,120]
color: Black
bgcolor: white
strokeWidth: 1
label:
text: Y
position: r
fontSize: 11
- Segment:
a: [200,0]
b: [200,0]
color: Black
bgcolor: white
strokeWidth: 1
label:
text: \ L
position: t
fontSize: 11
- Segment:
a: [0,calcs.Y]
b: [calcs.L, calcs.Y]
color: green
lineStyle: dotted
strokeWidth: 2
- Segment:
a: [calcs.L, calcs.Y]
b: [calcs.L, 0]
color: green
lineStyle: dotted
strokeWidth: 2
- Segment:
a: [0, calcs.Y]
b: [0, calcs.Y]
color: black
bgcolor: green
label:
text: calcs.Y.toFixed(2)
position: r
fontSize: 10
- Segment:
a: [calcs.L, 0]
b: [calcs.L, 0]
color: black
bgcolor: green
label:
text: calcs.L.toFixed(1)
position: t
fontSize: 10
- Segment:
a: [195, calcs.Yf]
b: [195, calcs.Yf]
color: white
bgcolor: "'#d62728'"
label:
text: F(K,L)
position: l
fontSize: 10
- Segment:
a: [calcs.L+60, calcs.isolucro2+10]
b: [calcs.L+60, calcs.isolucro2+10]
color: white
bgcolor: grey
label:
text: "`\\\\frac{\\\\pi}{P} + \\\\frac{W\\\\cdot L}{P} + \\\\frac{r\\\\cdot K}{P}`"
position: bl
fontSize: 10
- Point:
coordinates: [calcs.L, calcs.Y]
color: black
r: 5
bottomGraph:
xAxis:
min: 0
max: 200
ticks: 4
yAxis:
min: 0
max: 15
ticks: 4
objects:
#Função de Demanda por Fator Trabalho
- Curve:
fn: "(params.p)(1-params.a)*(60^(params.a))/(x^(params.a))"
ind: x
min: 0
max: 200
color: blue
strokeWidth: 3.5
samplePoints: 300
- Segment:
a: [200,0]
b: [200,0]
color: Black
bgcolor: white
strokeWidth: 1
label:
text: \ L
position: t
fontSize: 11
- Segment:
a: [0,15]
b: [0,15]
color: Black
bgcolor: white
strokeWidth: 1
label:
text: W
position: r
fontSize: 11
- Segment:
a: [0,params.w]
b: [calcs.L,params.w]
color: green
strokeWidth: 2
lineStyle: dotted
- Segment:
a: [0,params.w]
b: [0,params.w]
color: black
bgcolor: green
label:
text: "`(\\\\$)\\\\ ${params.w.toFixed(1)}`"
position: r
fontSize: 10
- Segment:
a: [calcs.L, 0]
b: [calcs.L, calcs.L]
color: green
strokeWidth: 2
lineStyle: dotted
- Segment:
a: [calcs.L,0]
b: [calcs.L,0]
color: black
bgcolor: green
label:
text: calcs.L.toFixed(1)
position: t
fontSize: 10
- Segment:
a: [195,calcs.W]
b: [195, calcs.W]
color: white
bgcolor: "'#1f77b4'"
label:
text: w(L)
position: l
- Point:
coordinates: [calcs.L, params.w]
color: black
r: 5
sidebar:
controls:
- title: Função de Produção de Curto-prazo e Demanda por Trabalho
sliders:
- param: a
label: \alpha
digits: 2
- param: w
label: W
digits: 3
- param: p
label: p
digits: 3