编织为PDF时如何在Rmd的空白处保持代码块

Question

当我尝试将RMarkdown文件编织为PDF时，由于某种原因，我无法将r代码块放入页边距内。

我尝试了多种解决方案，包括

1. opts_chunk$set(tidy.opts=list(width.cutoff=40),tidy=TRUE)

我从下面的链接中获得了此解决方案。

In R markdown in RStudio, how can I prevent the source code from running off a pdf page?

但是，正如您在下面看到的那样，即使进行了设置，代码仍会在页面上运行。

1. 将out.width='50%'放入我的chunck标头中

2. 只是尝试将我的代码隔开，所以没有长行。

但没有任何效果。

问题出在这里

这是相应的RMarkdown代码

```{r message = FALSE , tidy=TRUE, out.width='50%'}
## bunch of code

poverty_status_table <-
    create_table(df, "POVERTY STATUS IN THE PAST 12 MONTHS", year)  %>%
    mutate(
      POVERTY.STATUS.IN.THE.PAST.12.MONTHS = 
        gsub(
        "^Workers 16 years and over for whom poverty status is determined - ",
        "",
        POVERTY.STATUS.IN.THE.PAST.12.MONTHS
      )
    ) %>% 
    mutate(
      POVERTY.STATUS.IN.THE.PAST.12.MONTHS = gsub(
        " of the poverty level",
        "",
        POVERTY.STATUS.IN.THE.PAST.12.MONTHS
      )
    ) %>% 
    rename(Poverty.status = 
             POVERTY.STATUS.IN.THE.PAST.12.MONTHS) %>% 
    filter(Poverty.status != 
             "Workers 16 years and over for whom poverty status is determined")

## more code

您可以在图片中看到，我的目标是使代码停留在页边空白内。