我正在尝试创建一个模拟经济模型的程序。我有一些参数,我必须能够改变。我应该看起来像这样。所以我的问题是如何创建一个程序,我可以决定时间段和参数。假设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 | ... | ... | ... |
答案 0 :(得分:1)
以下内容应该足以让您了解如何解决这个问题。由于目前尚不清楚,这是否是家庭作业,可能会有一两个问题迫使你强迫你,密切关注它并可能做一两次修正。尽管
,但它的工作原理应该是显而易见的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))
祝你好运!