apa_table () преобразование научных чисел в числовые - PullRequest
Новая
       24

apa_table () преобразование научных чисел в числовые

0 голосов
/ 10 сентября 2018

Привет. Я пытаюсь преобразовать научную ценность в числовую.

Я беру свой код и использую RMarkdown для вывода результатов в формате PDF, используя apa_table().

Я пробовал options(scipen = 999), но это не работает.

Вот мой код: 

pat.paid <- 
bal.df.COOP %>%
nest(-Year_Category, -Short_Rating) %>%
mutate(Quantiles = map(data, ~ quantile(.$PatDiv_Cash))) %>%
unnest(map(Quantiles, tidy)) %>%
spread(names, x) %>%
#select("Year_Category", "Short_Rating" ,`0%`,`25%`,`50%`,`75%`, `100%`) %>%
select("Year_Category", "Short_Rating" ,`25%`,`50%`,`75%`) %>%
mutate_at(vars(`25%`,`50%`,`75%`), funs(prettyNum(., big.mark = ","))) %>%
mutate_at(vars(`25%`,`50%`,`75%`), funs(prettyNum(., big.mark = ","))) %>%
rename(#Minimum = `0%`,
     #Maximum = `100%`,
     Decade = "Year_Category",
     "Short Rating" = "Short_Rating")

Затем я передаю его в свой блок R: 

```{r 'Cash Patronage Paid Quartiles', echo=FALSE, message=FALSE, warning=FALSE, results="asis"}
options(scipen = 999)
apa_table(pat.paid,
      caption = "Co-op Cash Patronage Paid Quartiles by Decade & Condensed Rating")

И вот результирующая таблица:

apa_table output

Есть ли лучший способ сделать таблицы в стиле APA с лучшими параметрами настройки?

...