gsub e pad dentro de um parêntese
Eu tenho vetor assim:
x <- c("20(0.23)", "15(0.2)", "16(0.09)")
e eu não quero mexer com os números do lado de fora dos parênteses, mas quero remover o zero inicial dos números e fazer com que tudo tenha 2 dígitos. A saída será semelhante a:
"20(.23)", "15(.20)", "16(.09)"
Informação útil:
Eu posso remover o zero inicial e reter 2 dígitos usando a função abaixo tirada de:LIGAÇÃO
numformat <- function(val) { sub("^(-?)0.", "\\1.", sprintf("%.2f", val)) }
numformat(c(0.2, 0.26))
#[1] ".20" ".26"
eu seigsub
pode ser usado mas eu não sei como. Eu vou fornecer umstrsplit
resposta, mas isso é hackish na melhor das hipóteses.