以编程方式将标题插入多节r降价文档

Question

我正在使用R markdown，knitr和pander创建一个多节PDF文档。虽然我已经阅读了以前的帖子[博客]：Programmatically insert text, headers and lists with R markdown关于这个主题的“帖子”，但我仍然遇到问题。

我用来插入标题的函数是：

我只能提供代码的骨架版本，实际上是几百行：

{r , echo=FALSE, include = TRUE, warning = FALSE, results = 'asis'}
    prt.scale.heading <- function(scale, iter) {
       txt <- "Analysis of "
       # add blank lines as suggested in previous post     
      cat("\n\n") 
      hdr <- paste(txt,scale,"Iteration",iter)
      # show header using the R markdown '#' symbol
       cat('\n#',hdr,'\n')
    }

do_analysis <- function(resp.data, scale, maxChanges = 1, 
                    filename = NULL)  {

    iter <- 0
    while (iter <= maxChanges) {
        prt.scale.heading(scale, iter)
        iter <- iter + 1
    }
}

do_analysis(resp.data = temp, scale.name, maxChanges = 5)
}

当我运行我的代码时，我看到的是纯文本标题，前面是'＃'。请注意，所有文本，图表和表格（pander）都放在一个大块中，我设置了chunk选项results ='asis'（如前一篇文章中所建议的那样）。

建议？