Cambios de escala al tejer.

Estoy tratando de crear un gráfico que muestre la duración de los casos judiciales en días en diferentes juzgados de distrito. Quiero estandarizar las alturas de las barras para llenarlas según diferentes tipos de sentencia (por ejemplo, libertad condicional, prisión, etc.) y comparar las duraciones de los casos para diferentes tipos de sentencia. No estoy seguro si el código que tengo es correcto para lograr lo que quiero, pero este es el código que estoy utilizando:

ggplot(plot_one_data, aes(x = length_of_case_in_days, y = sentence_court_name)) +
  geom_col(aes(fill = sentence_type), position = "fill") +
  theme_minimal() + 
  labs(
    x = "Duración Relativa del Caso en Días", 
    y = "Tribunal de Sentencia",
    fill = "Tipo de Sentencia"
  )

Este es el resultado cuando ejecuto el código en línea en un Rmd: plot in Rmd

Cuando compilo el Rmd, el gráfico se ve así en el archivo HTML: plot in html

Obviamente, la escala es completamente diferente y el gráfico no es lo que quiero en el archivo HTML, lo cual me hace cuestionar si incluso tengo el código correcto para lograr lo que quiero. Nuevamente, quiero estandarizar las alturas de las barras para poder comparar las duraciones relativas de cada tipo de caso de sentencia en diferentes tribunales de distrito. Entonces, me pregunto:

1) ¿Es correcto mi código para lograr esto y
2) Si es así, ¿por qué la escala cambia completamente al compilar?