Snapshot before turning into package.

I know this is not the right way to use commits.
This commit is contained in:
Matt
2016-04-13 11:13:08 -05:00
parent 4bd1a95dc5
commit 3cca33498f
2 changed files with 258 additions and 3 deletions

View File

@ -36,7 +36,7 @@ journal$Debit<-as.numeric(sub(",","",journal$Debit))
journal$Credit<-as.numeric(sub(",","",journal$Credit)) journal$Credit<-as.numeric(sub(",","",journal$Credit))
## Temp function location ## Temp function location
# TODO learn where to store functions # TODO https://github.com/mattbk/ledgerr/issues/1
########## net() function, takes journal, class name(s), and date range as arguments ########## net() function, takes journal, class name(s), and date range as arguments
net<-function(journ,classselect="all",accselect="all",dates="all"){ net<-function(journ,classselect="all",accselect="all",dates="all"){
if("all" %in% classselect) { if("all" %in% classselect) {
@ -85,8 +85,6 @@ return(net.class.out)
} }
########## ##########
#work in progress
########## Net table by account ########## Net table by account
net.acc<-function(journ, net.acc<-function(journ,
classselect="all", classselect="all",

257
working.html Normal file

File diff suppressed because one or more lines are too long