R/PU_NTNF_BR.R

In claudiolucinda/FixedIncomeBR: Fixed Income Function for Brazilian Bonds

#' Function for pricing ``Notas do Tesouro Nacional - Série F'' 
#' Zero Coupon Brazilian government bonds, also known as ``Tesouro Prefixado com Juros Semestrais''
#'
#' @param .dataEval - Date when the pricing is to be made. If NULL, it is priced in the current working day
#' @param .maturity - Maturity - as a string or a date (Date or POSIXct)
#' @param .YTM - Yield to Maturity (in decimals per year with 252 working days)
#'
#' @return Bond Price
#' @export
#' 
PU_NTNF_BR <- function(.dataEval=NULL, .maturity, .YTM) {

  PU<-PU_BRbond(dataEval = .dataEval,maturity=.maturity, coupon_rate = .1, VF = 1000,
                             YTM=.YTM, months_coupon = 6)
  
  
}