Brought over onc_stand_ses.R and onc_ses.R==onc_tree_ses.R from romer