Simple comparison of two BDData objects based on comparing both type and data hash.
compareBDData(x, y)
x | a |
---|---|
y | a |
list of two values giving agreement of "data" and "type".
## compare data with same MD5 hash value bdd1 <- BDData(data.frame(x = 1:10)) bdd1h <- hashBDData(bdd1) compareBDData(bdd1, bdd1h)#> $data #> [1] TRUE #> #> $type #> [1] FALSE #>## compare different data, both same type bdd2 <- BDData(data.frame(x = 2:11)) bdd2h <- hashBDData(bdd2) compareBDData(bdd1, bdd2)#> $data #> [1] FALSE #> #> $type #> [1] "data" #>compareBDData(bdd1h, bdd2h)#> $data #> [1] FALSE #> #> $type #> [1] "md5hash" #>## compare completely different data compareBDData(bdd1, bdd2h)#> $data #> [1] FALSE #> #> $type #> [1] FALSE #>