R/Eloratingstodf.r

In jzwolski/tennisR: Tennis Match Statistics

#' Transforms a list of elo ratings into a data frame.
#' 
#' @param ratings A list of elo ratings.
#' @return The elo ratings in a data frame.
#' @export
Eloratingstodf <- function(ratings){
  elo.subset <- ldply(ratings, data.frame)
  elo.subset <- elo.subset[-c(1,9,10,11)]
  elo.subset <- head(elo.subset,-3)
  return(elo.subset)
}