Tests whether an object is "fuzzy", i.e. a logical random scalar that has probability strictly between zero and one (not strictly true nor strictly false).
is.fuzzy(x)an object, random or constant
Kerman, J. and Gelman, A. (2007). Manipulating and Summarizing Posterior Simulations Using Random Variable Objects. Statistics and Computing 17:3, 235-244.
See also vignette("rv").
x <- as.logical(rvbern(1,0.4)) # a logical random variable
is.fuzzy(x) # TRUE, since x is logical and not constant
#> [1] TRUE
is.fuzzy(x<2) # FALSE, since x is less than 2 with probability one
#> [1] FALSE
is.fuzzy(rvnorm(1)) # FALSE, since it's not a probability
#> [1] FALSE
is.fuzzy(TRUE) # FALSE, since TRUE is strictly TRUE
#> [1] FALSE
is.fuzzy(1) # FALSE, since 1 is not a logical variable
#> [1] FALSE