Solución:
Necesita separar la multiplicación en una operación separada:
mtcars$cyl %>% table() %>% prop.table() %>% `*`(100) %>% round(2)
También podemos usar {}
para evaluar el (...
) en su conjunto dentro del %>% ... %>%
antes de cambiar a la siguiente %>%
mtcars$cyl %>%
table() %>%
prop.table() %>% {. * 100} %>%
round(2)
.
# 4 6 8
# 34.38 21.88 43.75
¡Haz clic para puntuar esta entrada!
(Votos: 0 Promedio: 0)