convertir la relación a numérica en r
sapply(strsplit(ratio, ":"), function(x) as.numeric(x[1])/as.numeric(x[2]))
#[1] 0.4925373 0.5873016 0.7241379 0.8181818 0.8518519
Shiny Skimmer