Olá Thais, tudo bem? Espero que sim!
Desculpe pela demora em retornar.
No primeiro gráfico, você colocou uma vírgula ao invés da soma após a inserção do ggtitle(). Veja que no segundo gráfico você utiliza o sinal + para adicionar o theme(), mas no primeiro gráfico há apenas uma vírgula separando o ggtitle() do theme().
No segundo gráfico, faltou um parênteses para encerrar o data.frame(), fazendo com que o operador pipe %>% esteja associado ao table que está dentro do data.frame. Mas o correto seria aplicar o pipe após a conversão para data.frame, para que seja possível utilizar a função rename. Com isso, é necessário remover um parênteses ao fim da função, na linha onde se encontra legend.position = "bottom"
, já que o parênteses da função data.frame está sendo fechado somente ali.
Espero que tenha tirado sua dúvida.
Estou à disposição. Bons estudos!