Given that you start with a character vector, this is relatively easy :
minPerGame <- c("4:30","2:20","34:10")
sapply(strsplit(minPerGame,":"),
function(x) {
x <- as.numeric(x)
x[1]+x[2]/60
}
)
gives
[1] 4.500000 2.333333 34.166667
Make sure you checked that you used read.csv()
with the option as.is=TRUE
. Otherwise you’ll have to convert using as.character()
.