xTable Knitr 错误 - 每行都以 PDF 格式打印在下方

问题描述

我尝试将我的 R-Markdown 编织为 PDF 并想使用 xtable 打印一些表格，但不幸的是我将表格的每个项目都打印在下面：Print Output （仅供参考：我在读大学，并要求在此练习中使用 xtable）。

我使用以下代码（有更多的表，但它们遵循相同的模式； 库 xtable 之前已经加载到我的 R-Markdown 中）：

import os
import pickle
from google_auth_oauthlib.flow import InstalledAppFlow
from google.auth.transport.requests import Request

class Fetch:
      def __init__ (self,credential_filename):
            self.scopes = ['https://www.googleapis.com/auth/classroom.courses.readonly','https://www.googleapis.com/auth/classroom.announcements',]
            self.path = 'C:/frank/programs/python/Google Api'
            self.credential_file = credential_filename

      def __call__(self):
            os.chdir(self.path)

         
            token = open('token.pickle','rb')
            creds = pickle.load(token)

            if creds.valid == False:
                  if creds.expired == True:
                        creds.refresh(Request())
                  else:
                        try:
                              flow = InstalledAppFlow.from_client_secrets_file(self.credential_file,self.scopes)
                              creds = flow.run_local_server(port=0)
                        except FileNotFoundError:
                              print(f'{self.credential_file} does not exist')

                        token = open(self.token_file,'wb')
                        pickle.dump(creds,token)
            return creds
 

                   
        
              
                       

我很感激任何帮助， 谢谢， 玛蒂娜

解决方法

如果您想在 pdf 中编织，请保留 results='asis' 而不要打印 xtable。

```{r echo=FALSE}
library(xtable)
swisstable <- sapply(swiss,function(x) {
   c(Mean = mean(x),SD = sd(x),Median = median(x),IQR = IQR(x))
 })
```

```{r results='asis',echo=FALSE}
  xtable(swisstable,digits = 1,caption = "Tabelle 2: Überblick über den Datensatz swiss")
```