ds_summary_stats does not show missing values

[aravindhebbali]

In the presence of missing values, ds_summary_stats() does not show the correct number of observations and corresponding missing values.

library(descriptr)
mt <- mtcarz
mt[2, 1] <- NA
ds_summary_stats(mt, mpg)
#>                         Univariate Analysis                          
#> 
#>  N                       31.00      Variance                37.51 
#>  Missing                  0.00      Std Deviation            6.12 
#>  Mean                    20.06      Range                   23.50 
#>  Median                  19.20      Interquartile Range      7.45 
#>  Mode                    10.40      Uncorrected SS       13601.31 
#>  Trimmed Mean            19.92      Corrected SS          1125.19 
#>  Skewness                 0.68      Coeff Variation         30.53 
#>  Kurtosis                -0.10      Std Error Mean           1.10 
#> 
#>                               Quantiles                               
#> 
#>               Quantile                            Value                
#> 
#>              Max                                  33.90                
#>              99%                                  33.45                
#>              95%                                  31.40                
#>              90%                                  30.40                
#>              Q3                                   22.80                
#>              Median                               19.20                
#>              Q1                                   15.35                
#>              10%                                  14.30                
#>              5%                                   11.85                
#>              1%                                   10.40                
#>              Min                                  10.40                
#> 
#>                             Extreme Values                            
#> 
#>                 Low                                High                
#> 
#>   Obs                        Value       Obs                        Value 
#>   14                         10.4        19                         33.9  
#>   15                         10.4        17                         32.4  
#>   23                         13.3        18                         30.4  
#>    6                         14.3        27                         30.4  
#>   16                         14.7        25                         27.3