2016-06-21 12 views
1

Rを使用してテーブル出力をhttp://www.wolframalpha.com/input/?i=mortgageから複製しようとしています。次のコードを設定しましたが、次に何をすべきかわかりません。ここで住宅ローン現金計算機in R

mortgage_cash_flow_enginer <- function(loan_amt,loan_period,APR){ 
       loan_amt <- readline(prompt = "Loan Amount: ") 
       loan_period <- readline(prompt = "Loan Peroid: ") 
       APR <- readline(prompt = "Annual Percentage Rate (%): ") 


       pmt_numerator <- ((loan_amt)*((APR)/(100*12L))) 
       morpmt_denomenator <- (1-((1+((APR)/(100*12L)))^((-1)*loan_period*12))) 
       monthly_payment <- (pmt_numerator)/(pmt_denomenator) 
       return(as.integer(monthly_payment)) 
} 

答えて

2

あなたのコードで問題されています

  1. クラスが正しく入力に設定されていないが、
  2. オブジェクトあなたはpmt_denomenatorと呼ばれるオブジェクトを持っていなかったが、あなたはそれを参照(それがでした

    :このコードは、現在正常に動作

)何かを呼ばれます

あなたのコードにプログラミングバグは修正されていますが、使用している式はまだ異なっていると思います。これはcorrect formulaです。

+0

ありがとうございました。私は数式を更新し、必要に応じて動作させました。 – HP63

+0

@ HP63ようこそ、よろしくです! –

関連する問題