Guest User

Untitled

a guest
Dec 17th, 2018
63
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.37 KB | None | 0 0
  1. setkey(HabList[[loc]], tQile, fish.yr)
  2. HabList[[loc]] <- HabList[[loc]][,.SD[order(tQile, fish.yr)]]
  3.  
  4. HabList[[loc]][, DD := cumsum(temp.degC), by=c('tQile','fish.yr')]
  5. HabList[[loc]][,.(temp.degC, DD)]
  6. temp.degC DD
  7.  
  8. HabList[[loc]][, DD := lapply(temp.degC, 'cumsum'), by=c('tQile','fish.yr')]
  9. HabList[[loc]][,.(temp.degC, DD)]
  10. temp.degC DD
Add Comment
Please, Sign In to add comment