2017-07-20 2 views
0

Ich habe diskrete Schrittfunktionen für Angebot und Nachfrage. Ich suche nach einem Algorithmus, um den Gleichgewichtspreis zu finden, Die Daten sind unten in R, aber eine Lösung jede Sprache (oder Pseudo-Code) ist akzeptabel.Algorithmus für Marktreinigung

demand = data.frame(volume = c(8,2,3,1,1), price=c(1,2,3,4,5)) 
supply = data.frame(volume = c(3,2,4,2,3), price=c(5,4,3,2,1)) 

demand$volume <- cumsum(demand$volume) 
supply$volume <- cumsum(supply$volume) 

plot(demand, type="s") 
lines(supply, type="s", col=3) 

enter image description here

+0

Ich sehe keinen Punkt, wo qd = qs. Ich bin kein Wirtschaftswissenschaftler, aber ich erinnere mich, dass qd = qs der Gleichgewichtspunkt war. Was sollte die Ausgabe des obigen Falles sein? –

+0

@Vidor Vistrom du hast Recht, ich habe es behoben – Qbik

Antwort

1

Sie benötigen Teilcumsum Volumen von entgegengesetzten Enden der Preisspanne zu nehmen.

demand_cum = (15, 7, 5, 2, 1) 
supply_cum = (3, 5, 9, 11, 14) 

Dies zeigt Ihnen insgesamt kumulative Nachfrage & Versorgung zu jedem Preis. Jetzt können Sie das Gleichgewicht erkennen?