blotter_0.9.1643 pennyPerShare() not reflecting addTxn usage
2014-10-31 3:08 GMT+01:00 Gei Lin <gmonaie at gmail.com>:
within blotter::addTxn(), there's a call using the TxnFees argument as a function if (is.function(TxnFees)) * txnfees <- TxnFees(TxnQty, TxnPrice)* pennyPerShare(), referenced as an example TxnFee function, doesn't have its arguments set to reflect this yet
blotter::pennyPerSharefunction (TxnQty)
{
return(abs(TxnQty) * -0.01)
}
It should be something like:
pennyPerShare <- function(TxnQty, ...) {
return(abs(TxnQty) * -0.01)
}
thx,
Daniel