Gostaria de cronometrar os pedaços de knitr e registrar quanto tempo levou para renderizá-los usando comentários na saída do LaTeX.

Eu tentei o seguinte gancho:

 now = Sys.time()
 knit_hooks$set(timeit = function(before) {
     if (before) { now <<- Sys.time() }
     else {
         paste("%", sprintf("Chunk rendering time: %s seconds.\n", round(Sys.time() - now, digits = 3))) 
     }
 })

E produz o comentário correto com o tempo, mas o problema é que ele está envolvido no kframe, o que resulta em lacunas feias na saída do LaTeX:

\begin{kframe}

% Chunk rendering time: 12.786 seconds.

\end{kframe}

Existe uma maneira de produzir comentários desembrulhados?