получить сообщение об ошибке "Ошибка:` x` должно быть формулой " - PullRequest
Новая
       58

получить сообщение об ошибке "Ошибка:` x` должно быть формулой "

1 голос
/ 30 октября 2019

Я использую пакет qwraps2, который имеет функцию summary_table. По какой-то причине я получаю сообщение об ошибке «Ошибка: x должна быть формулой» при выполнении кода ниже. 

args(summary_table)

summary_table(death_vs_gender, summaries = qsummary(death_vs_gender))

our_summary1 <- list("Table 2: Summary Statistics for Mass 
Shooting Deaths in American between 
1966-2017 by Men & Women" = list(
                             "n" = sum(death_vs_gender$Deaths),
                             "Min" = ~ min(death_vs_gender$Deaths),
                             "Max" = ~ max(death_vs_gender$Deaths),
                             "Median" = ~ median(death_vs_gender$Deaths),
                             "Mean" = ~ mean(death_vs_gender$Deaths),
                             "Std. Dev." = ~ sd(death_vs_gender$Deaths)))


whole <- summary_table(death_vs_gender, our_summary1)
whole

1 Ответ

0 голосов
/ 14 ноября 2019

Кажется, что ~ опущено в строке "n" = sum(death_vs_gender$Deaths),.

Попробуйте следующее: 

our_summary1 <- 
  list("Table 2: Summary Statistics for Mass Shooting Deaths in American between 1966-2017 by Men & Women" = 
       list(
            "n"         = ~ sum(.data$Deaths),
            "Min"       = ~ min(.data$Deaths),
            "Max"       = ~ max(.data$Deaths),
            "Median"    = ~ median(.data$Deaths),
            "Mean"      = ~ mean(.data$Deaths),
            "Std. Dev." = ~ sd(.data$Deaths)
           )
      )

Обратите внимание, что имя death_vs_gender было заменено на .data, местоимение данных в тидиверсе. Это важное изменение. Использование местоимения поможет предотвратить ошибочные результаты из-за проблем с областями видимости.

...