1

我正在制作一个比较拥有和租用公寓的程序。作为程序的一部分，我想创建一个年金贷款的数据框，其中包含利息和本金支付以及剩余余额。贷款的计算很容易，但我很难存储它。

我是 R 的新手，我正在尝试将它用于学校的项目而不是 Excel。我试图将它存储在数据框中，但出现回溯错误，而且我有点慢。我在网上查找了代码，但也不想 100% 撕掉它，而且它是按月计算的。还在 FinancialMath 包中尝试了类似的抵押功能，但没有获得具有所需输出的数据框。真正重要的不是这个抵押部分，但它对我在程序其余部分的计算至关重要。

我的项目中的抵押功能片段，使用年基，其中P是本金，I是利率，N是年数

    mortgage <- function(P=100000, I=1, N=10, amort=TRUE) {
     I <- I/100
     PMT <- (I*P)/(1-(1+I)^(-N))
     if(amort==TRUE) {
      Pt <- P
      currP <- NULL
      while(Pt>=0) {
        H <- Pt * I
        C <- PMT - H
        Q <- Pt - C
        Pt <- Q
        currP <- c(currP, Pt)
      }
    }
  }

具有变量年份、余额、PMT、利息支付、本金支付的数据框。想在某种程度上区分我的代码，但结果与（减去情节）类似http://faculty.ucr.edu/~tgirke/Documents/R_BioCond/My_R_Scripts/mortgage.R

4

0 回答 0