Ошибка в as.data.frame.character(x, stringsAsFactors = FALSE, ...) при использовании папайи и tableone в RMarkdown

Question

Я использую папайю для создания документа в формате APA в RMarkdown, однако функция apa_tables() выдает ошибку, когда я пытаюсь создать свой документ [sidenote: apa_tables() основывается на kable()]

## reprex dataframe
head<-structure(list(age = c(30, 30, 24, 30, 29, 58), 
                   education = structure(c(5L, 2L, 2L, 2L, 2L, 3L), .Label = c("Less than high school", "High school diploma or GED", "Some college", "Associate's degree", "Bachelor's degree", "Professional or Masters degree", "Doctorate"), class = "factor"), 
                   gender = structure(c(2L, 2L, 2L, 2L, 2L, 1L), .Label = c("Male", "Female", "Non-binary", "Agender", "Androgynous", "Demigirl", "Transgender (preferred gender not stated)","NA"), class = "factor"), 
                   household_income = structure(c(5L, 3L, 6L, 1L, 2L, 2L), .Label = c("Less than $10,000", "$10,000 - $19,999","$20,000 - $29,999", "$30,000 - $39,999", "$40,000 - $49,999", "$50,000 - $59,999", "$60,000 - $69,999", "$70,000 - $79,999", "$80,000 - $89,999", "$90,000 - $99,999", "$100,000 - $149,999", "More than $150,000", "Prefer not to say"), class = "factor"), 
                   ideology_general = c(8L, 3L, 5L, 8L, 9L, 8L), 
                   ideology_economic = c(9L, 6L, 8L, 4L, 9L, 8L), 
                   ideology_social = c(7L, 4L, 3L, 6L, 9L, 8L), 
                   study = c("Climate Change", "Climate Change", "Flu vaccination", "Climate Change", "Climate Change", "Flu vaccination")), 
              row.names = c(NA,-6L), class = c("tbl_df", "tbl", "data.frame"))


## Use tableone to create a demographics table
tab<-print(tableone::CreateTableOne(vars = c("age", 
                             "education",
                             "gender",
                             "household_income", 
                             "ideology_general", 
                             "ideology_economic", 
                             "ideology_social"), 
                    data = head, strata = "study", test = FALSE), printToggle = FALSE)

## print table using papaja
papaja::apa_table(tab)

Этот код выдает ошибку

Error in as.data.frame.character(x, stringsAsFactors = FALSE, ...) : formal argument "stringsAsFactors" matched by multiple actual arguments

на линии с papaja::apa_table(tab)

Это работает должным образом, если я создаю таблицу с knitr::kable(tab) вместо papaja::apa_table(tab), однако это оставляет меня без других желаемых параметров формата.

Решено: обновление до новой версии папайи решило эту проблему.