Я не думаю, что sprintf делает это, но вы можете использовать formatC для этого
sprintf
formatC
x <- 123 formatC(as.numeric(x), format = 'f', flag='0', digits = 2) [1] "123.00"