R/1_helperFunctions.R

Defines functions leaveKey stockKey key getSender getRecipient fromToSplitter

#
# vim:set ff=unix expandtab ts=2 sw=2:
fromToSplitter=function(){"_to_"}
#####################################################################
getRecipient=function(stri){
  as.numeric(unlist(strsplit(stri,split=fromToSplitter()))[[2]])
}
#####################################################################
getSender=function(stri){
  as.numeric(unlist(strsplit(stri,split=fromToSplitter()))[[1]])
}
#####################################################################
key=function(i,j){
  paste(i,fromToSplitter(),j,sep="")
}
#####################################################################
stockKey=function(ip){paste("particles_in_pool_",ip,sep="")}
#####################################################################
leaveKey=function(ip){paste("particles_leaving_pool_",ip,sep="")}

Try the SoilR package in your browser

Any scripts or data that you put into this service are public.

SoilR documentation built on May 29, 2017, 10:57 a.m.