Bug in `geometric_sd` function

epiverse-trace / epiCo

R package for statistical and spatiotemporal modeling of epidemiological data for vector-borne diseases in Colombia

https://epiverse-trace.github.io/epiCo/

Other

12 stars 1 forks source link

Bug in `geometric_sd` function #143

Closed juan-umana closed 2 months ago

juan-umana commented 3 months ago

Please place an "x" in all the boxes that apply

[ x] I have the most recent version of epiCo and R
[ x] I have found a bug
[ ] I have a reproducible example
[ ] I want to request a new feature

When using the geometric_sd function with the positive method the stopifnot conditional is evalauting the x vector wrongly. It should evaluate: any(x > 0)