`hMeanChiSqCI`: input checks are too restrictive

[florafauna]

The following example returns an error

pvalues <- c(0.0245, 0.1305, 0.00025, 0.2575, 0.128)
lower <- c(0.04, 0.21, 0.12, 0.07, 0.41)
upper <- c(1.14, 1.54, 0.60, 3.75, 1.27)
se <- ci2se(lower, upper, ratio=TRUE)
estimate <- ci2estimate(lower, upper, ratio=TRUE)
Error in hMeanChiSqMu(thetahat = thetahat, se = se, w = w, mu = limit,  : 
  length(mu) == 1 || length(mu) == length(thetahat) is not TRUE

But in version 0.1-4 it returns:

[1] -1.77120440 -0.08827266

The input checks of hMeanChiSqMu() are too restrictive.

[florafauna]

add3f0b6540166e49c9b81182f2bce30afd338a2.