请问这题怎么写啊？（用R语言实现）

3. 小王贷款100万购买房子，贷款利率为4.9%（年利率），贷款期限20年，有等额本金还款和等额本息还款两种还款方式。现要求编写一个R函数，能给出两种还款方式下房屋按揭款的计算公式。并要求

(1)将还款方式作为其中一个函数参数，给定还款方式的情况下，以数据框的形式给出每月偿还本金、偿还利息、偿还本息、剩余本金；并给定还款方式情况下计算还款的利息。

(2)该函数适用不同贷款金额，利率及期限。

其中，等额本金每月偿还本金= 贷款总额/贷款月数

等额本息每个月的偿还本息=贷款总额*月利率*(1+月利率)^贷款月数/[(1+月利率)^贷款月数-1]