[skip ci]

Author: Raphael

cran-comments.md

@@ -22,18 +22,19 @@ check_win:
 R-hub:
  * Fedora Linux, R-devel, clang, gfortran - NOTE (spelling, see below)
  * Ubuntu Linux 16.04 LTS, R-release, GCC - 1 NOTE (DOI, see below), 1 WARNING (see below)
+ * Debian Linux, R-devel, GCC, no long double - NOTE (imports, see below)
 
 ## R CMD check results
 There were no ERRORs.
 
 There was 1 WARNING:
 
-Conversion of ‘README.md’ failed:
+Conversion of README.md€™ failed:
 pandoc: Could not fetch https://codecov.io/gh/alan-turing-institute/distr6/branch/master/graph/badge.svg
 
 * This link works normally for me and in all other builds, I am unsure why there's a problem in the Ubuntu Linux 16.04 LTS R-release.
 
-There were 2 NOTEs:
+There were 3 NOTEs:
 
 Found the following (possibly) invalid DOIs:
   DOI: 10.2307/2683801
@@ -50,6 +51,11 @@ Found the following (possibly) invalid DOIs:
 
   * These are respectively a name and the phrase 'et al' (not spelling mistakes)
 
+Namespaces in Imports field not imported from:
+  ?pracma? ?R6? ?R62S3?
+  All declared Imports should be used.
+  
+  * All imports are used in the package
 
 ## Downstream dependencies
 There are currently no downstream dependencies for this package.

tests/testthat/test-DistWeightedDiscrete.R

@@ -41,10 +41,8 @@ test_that("statistics",{
                                                   cdf = c(1/5,4/5,1)))$pdf(1:3), c(1/5,3/5,1/5))
   expect_equal(WeightedDiscrete$new(data.frame(x = 1:2,
                                                   pdf = c(0.5, 0.5)))$cdf(1:2), c(0.5, 1))
-  set.seed(42)
-  x = round(runif(1000, 0, 50))
-  gd = WeightedDiscrete$new(data.frame(x = sort(unique(x)),
-                                          pdf = as.numeric(table(x)/length(x))))
-  expect_equal(round(gd$quantile(gd$cdf(c(2,5,6,4,1,30,20,2,2,2)))),c(2,5,6,4,1,30,20,2,2,2))
+
+  gd = WeightedDiscrete$new(data.frame(x = 1:10, pdf = rep(0.1,10)))
+  expect_equal(round(gd$quantile(gd$cdf(c(2,5,6,4,1,30,20,2,2,2)))),c(2,5,6,4,1,10,10,2,2,2))
   expect_equal(length(gd$rand(10)),10)
 })