Mam taki wektor:

x <- c("20(0.23)", "15(0.2)", "16(0.09)")

i nie chcę zepsuć liczb na zewnątrz nawiasu, ale chcę usunąć wiodące zero na liczbach wewnątrz i sprawić, że wszystko będzie mieć 2 cyfry. Wynik będzie wyglądał następująco:

"20(.23)", "15(.20)", "16(.09)"

Przydatna informacja:

Mogę usunąć początkowe zero i zachować 2 cyfry za pomocą poniższej funkcji zaczerpniętej z:POŁĄCZYĆ

numformat <- function(val) { sub("^(-?)0.", "\\1.", sprintf("%.2f", val)) }

numformat(c(0.2, 0.26))
#[1] ".20" ".26"

wiemgsub może być używany, ale nie wiem jak. Podamstrsplit odpowiedz, ale to w najlepszym razie hackish.