R中的经济模拟
Economic simulation in R
我正在尝试创建一个模拟经济模型的程序。我有一些参数,我必须能够改变。我应该看起来像这样。所以我的问题是我将如何创建一个程序来决定时间段和参数。假设 Capital i 第 1 期由 Capital_1=(1-s)*Output_0+Capital_0 给出。劳动力由 Labour_1=(1+n)*labour_0 给出。 Output_1=Capital_1*Labour_1*k 其中s,n,k为参数
Time | Output | Capital | Labour |
------ | ------ | ------- | ------ |
0 | 10 | 2.5 | 2 |
1 | ... | ... | ... |
2 | ... | ... | ... |
3 | ... | ... | ... |
以下应该足以为您提供解决此问题的提示。由于不清楚,不管这是不是家庭作业,代码可能会有一两个问题迫使您仔细查看它并可能进行一两个更正。它的工作原理应该是显而易见的,不过
Output <- 10
Capital <- 2.5
Labour <- 2
generator <- function(steps,s, n, k){
for(i in 2:(steps)){
Capital[i] <- (1-s)*Output[i-1]+Capital[i-1]
Labour[i] <- n*Labour[i-1]
Output[i] <- Capital[i]*Labour[i]*k
}
return(data.frame(Output = Output, Capital = Capital, Labour = Labour))
}
print(generator(steps=10, s=.01, n=1.002, k=1.01))
祝你好运!
我正在尝试创建一个模拟经济模型的程序。我有一些参数,我必须能够改变。我应该看起来像这样。所以我的问题是我将如何创建一个程序来决定时间段和参数。假设 Capital i 第 1 期由 Capital_1=(1-s)*Output_0+Capital_0 给出。劳动力由 Labour_1=(1+n)*labour_0 给出。 Output_1=Capital_1*Labour_1*k 其中s,n,k为参数
Time | Output | Capital | Labour |
------ | ------ | ------- | ------ |
0 | 10 | 2.5 | 2 |
1 | ... | ... | ... |
2 | ... | ... | ... |
3 | ... | ... | ... |
以下应该足以为您提供解决此问题的提示。由于不清楚,不管这是不是家庭作业,代码可能会有一两个问题迫使您仔细查看它并可能进行一两个更正。它的工作原理应该是显而易见的,不过
Output <- 10
Capital <- 2.5
Labour <- 2
generator <- function(steps,s, n, k){
for(i in 2:(steps)){
Capital[i] <- (1-s)*Output[i-1]+Capital[i-1]
Labour[i] <- n*Labour[i-1]
Output[i] <- Capital[i]*Labour[i]*k
}
return(data.frame(Output = Output, Capital = Capital, Labour = Labour))
}
print(generator(steps=10, s=.01, n=1.002, k=1.01))
祝你好运!