View full-text article in PMC Sports (Basel). 2016 Dec 29;5(1):1. doi: 10.3390/sports5010001 Search in PMC Search in PubMed View in NLM Catalog Add to search Copyright and License information © 2016 by the author. Licensee MDPI, Basel, Switzerland. This article is an open access article distributed under the terms and conditions of the Creative Commons Attribution (CC BY) license (http://creativecommons.org/licenses/by/4.0/). PMC Copyright notice Algorithm A1 Pseudo-code for aggregate modeling procedure. Z←load_data() B←100 V←0.10 F←3.0 seg←select_one(Both,Pass,Run) ntree←1500 DT←0.97 Perf[:,B]←0 for b←1,B do [Z_oos,Z_mdl]←partition(Z) o←sample(Z,V∗nrow(Z),seg) Z_oos←Z[+o,:] Z_mdl←Z[-o,:] s<-strat_sample(Z_mdl,F,seg) Z_mdl←Z_mdl[s,:] mdl←gbm(Z_mdl(ntree,…)) y^←predict(mdl,Z_oos) [FDR,TPR]←roc(y^,y,DT) Perf[:,b]←accum(FDR,TPR,…) end for