Распределение подгонки с использованием fitdistplus вызвало ошибку в charToDate (x)

Я помещаю столбец в свой фрейм данных с распределением ядов, однако он продолжает предупреждать об этой ошибке: «Ошибка в charToDate (x): символьная строка не в стандартном однозначном формате»

 Date       Admissions Attendance Tri_1 Tri_2 Tri_3 Tri_4 Tri_5
   <date>          <int>      <int> <dbl> <dbl> <dbl> <dbl> <dbl>
 1 2014-04-01         84        209     5    33    62    80    29
 2 2013-08-01         96        207     2    45    95    59     6
 3 2013-12-01        100        254     3    37    97   102    14
 4 2014-02-01        106        235     3    38    83    94    17
 5 2014-01-01         84        222    10    25    53   115    18
 6 2013-07-01         99        235     8    33    89    85    20
 7 2014-06-01         89        210     9    37    58    89    17
 8 2014-03-01         94        247     6    36    73   110    22
 9 2014-05-01        101        211     5    33   113    53     6
10 2013-11-01        104        234     3    42   108    73     8

Вот мои данные, и я хотел бы подогнать их под столбец tri_1. даже если я меняю тип даты, ошибка сохраняется.

Вот мой код: оценка ‹- df%>% fitdist (data = Tri_1, distr =" pois ")

он продолжает предупреждать об этой ошибке: «Ошибка в charToDate (x): символьная строка не в стандартном однозначном формате»


r tidyverse fitdistrplus
person M1shka    schedule 14.04.2019    source источник
comment
Он не находится внутри одной из функций tidyverse. Итак, вам нужно извлечь столбец, например .$Tri_1, т.е. df %>% fitdist(data = .$Tri_1, distr = "Pois")   -  person akrun    schedule 14.04.2019

Ответы (1)


arrow_upward
0
arrow_downward

Имена столбцов без кавычек работают в среде функций tidyverse, таких как mutate/summarise/select/... fitdist взят из fitdistrplus и может быть несовместим с функциями tidyverse. Мы можем подать заявку напрямую

library(fitdistrplus)
fitdist(df$Tri_1,distr = "gamma")
#Fitting of the distribution ' gamma ' by maximum likelihood 
#Parameters:
#       estimate Std. Error
#shape 4.0508963  1.7421450
#rate  0.7501967  0.3434884

Или, если нам нужно использовать его в трубе, тогда столбец должен бытьpulled

library(dplyr)
df %>%
    pull(Tri_1) %>%
    fitdist(data = ., distr = "gamma")
#Fitting of the distribution ' gamma ' by maximum likelihood 
#Parameters:
#       estimate Std. Error
#shape 4.0508963  1.7421450
#rate  0.7501967  0.3434884
person akrun    schedule 14.04.2019