Isidora,

you're using a very old R version. The current version is R 2.7.0.

Cheers,
Simon

On May 24, 2008, at 9:52 AM, isidora k wrote:

hist(phat1000$t)
2008-05-24 14:47:33.633 R[252] *** Assertion failure in - [RDeviceView lockFocus], AppKit.subproj/NSView.m:3248 2008-05-24 14:47:33.633 R[252] *** REngine.runREPL: caught ObjC exception in the main loop! *** Please report the following error on [EMAIL PROTECTED] along with the full description of how to reproduce it: *** reason: lockFocus sent to a view whose window is deferred and does not yet have a corresponding platform window
*** name: NSInternalInconsistencyException, info: (null)
*** Version: R 2.5.1 (42083) R.app R 2.5.1 GUI 1.20 (4535)/ppc
Consider saving your work soon in case this problem leads to a full crash.

library(boot)

Binom1321Dat <- c(rep(1,13),rep(0,8))

Binom1921Dat <- c(rep(1,19),0,0)



# Next define a function which is needed in the 'boot' command.



phat <- function(d,i) {sum(d[i])/21}



# Generate 1000 bootstrap samples for the data with hit rate 13/21

# and plot a histogram of the estimate of p for these samples.



boot(Binom1321Dat,phat,1000)

phat1000 <- boot(Binom1321Dat,phat,1000)

hist(phat1000$t)



        [[alternative HTML version deleted]]

_______________________________________________
R-SIG-Mac mailing list
[email protected]
https://stat.ethz.ch/mailman/listinfo/r-sig-mac



_______________________________________________
R-SIG-Mac mailing list
[email protected]
https://stat.ethz.ch/mailman/listinfo/r-sig-mac

Reply via email to