Muchos dicen que R es el software estadístico que salvará al mundo, son los rumores. Lo cierto es que su lenguaje esta siendo aceptado para las ciencias tanto sociales como económicas. Parecer ser el software que todo el mundo esperaba para despertar lo cuantitativo y aprovechar la enorme cantidad de información que nos rodea gracias a internet. Lo más interesante es que hay una extensa comunidad de investigadores que afanadamente buscan hacer del R el sustituto perfecto de otros programas estadístico. Tenemos que aplaudir la iniciativa porque R es gratis y se puede obtener desde http://www.r-project.org.
La página de Economía Aplicada no se queda atrás y ha venido dando algunas explicaciones sobre R. Esta tomamos unas funciones de oferta y demanda para resolverla en R.
####### Copiar de aquí ##########################
#Oferta y Demanda
#Obtención de precio y cantidad de equilibrio.
#Funciones inversa de Oferta y Demanda.
# p=a-bQ
# p=c+dQ
#Definición de los parámetros
a<-300
b<-0.25
c<-40
d<-0.25
#Definimos los valores para el vector p
p<-seq(0,325,0.5)
#Definimos los valores de Qd y Qs con el despeje de cada una las funciones inversas de oferta y demanda.
Qd <- (a-p)/b
Qs <- (p-c)/d
#Graficar ambas funciones
plot(Qd,p, main="Grafico de Oferta y Demanda", xlab="Cantidades", ylab="Precios", type="l", col="Blue")
lines(Qs,p, col="Red")
#Cálculo del equilibrio
#Cantidad*
QO <- (a-c)/(b+d)
#Precio*
PO <-(a*d+b*c)/(b+d)
#Obtención de precio y cantidad de equilibrio.
#Funciones inversa de Oferta y Demanda.
# p=a-bQ
# p=c+dQ
#Definición de los parámetros
a<-300
b<-0.25
c<-40
d<-0.25
#Definimos los valores para el vector p
p<-seq(0,325,0.5)
#Definimos los valores de Qd y Qs con el despeje de cada una las funciones inversas de oferta y demanda.
Qd <- (a-p)/b
Qs <- (p-c)/d
#Graficar ambas funciones
plot(Qd,p, main="Grafico de Oferta y Demanda", xlab="Cantidades", ylab="Precios", type="l", col="Blue")
lines(Qs,p, col="Red")
#Cálculo del equilibrio
#Cantidad*
QO <- (a-c)/(b+d)
#Precio*
PO <-(a*d+b*c)/(b+d)
paste("El par de equilibrio (p_Optimo, Q_Optimo) es", PO,QO)
Este programa presentará dos valores.
El precio óptimo será 170.
La cantidad óptima será 520.
La gráfica obtenida sería:
Deybi Morales León
morales.economia@gmail.com
Busca el grupo Local: Usuarios R Nicaragua en facebook. Aprendamos juntos R.
Comentarios
Publicar un comentario