Displaying 1 result from an estimated 1 matches for "tp3058335p3058335".
2010 Nov 25
2
delete-d jackknife
...- numeric(n)
for (i in 1:n)
theta.jack[i] <- mean(y[-i]) / mean(z[-i])
bias <- (n - 1) * (mean(theta.jack) - theta.hat)
print(bias)
but how i can apply delete-d jackknife when d=2 or 3.
Thanks forany idea..
--
View this message in context: http://r.789695.n4.nabble.com/delete-d-jackknife-tp3058335p3058335.html
Sent from the R help mailing list archive at Nabble.com.