# script to make cd4.nested library(boot) data(cd4) temp <- boot(cd4, nested.corr, R=1, stype="w", t0=corr(cd4), M=9) tempcl <- temp$call tempcl$R <- 999 tempcl$M <- 249 junk <- scan(file="",list(0,0),nmax=999*2) 1.144 0.832 1.070 0.828 -0.783 0.164 -0.867 0.176 0.627 0.700 4.499 0.904 1.415 0.844 -0.457 0.324 1.270 0.868 1.479 0.860 -0.772 0.192 -0.587 0.288 -1.805 0.040 0.080 0.548 0.693 0.732 -1.321 0.072 0.313 0.624 0.751 0.772 -0.868 0.152 -0.365 0.348 0.386 0.640 -0.158 0.476 0.561 0.660 -0.087 0.412 0.962 0.724 1.432 0.892 -0.151 0.388 0.420 0.604 1.055 0.792 -1.209 0.068 -1.072 0.128 0.104 0.544 -0.225 0.384 0.800 0.764 0.477 0.652 1.089 0.732 -0.978 0.164 1.664 0.812 2.055 0.908 -0.365 0.316 0.697 0.740 3.514 0.948 -0.921 0.120 1.076 0.760 -0.486 0.300 0.137 0.524 -0.976 0.120 -0.035 0.496 -1.607 0.064 2.672 0.960 0.001 0.412 0.249 0.596 -0.471 0.308 0.541 0.624 -0.137 0.440 1.047 0.816 -0.175 0.420 -0.689 0.240 -0.208 0.412 -1.574 0.064 0.073 0.520 -1.192 0.104 3.359 0.980 -0.041 0.428 -0.506 0.332 0.762 0.748 -0.735 0.232 1.372 0.856 0.109 0.560 -1.611 0.064 -0.798 0.200 -0.534 0.244 -0.617 0.236 0.671 0.724 -1.500 0.032 -0.302 0.368 -0.793 0.240 2.322 0.956 0.297 0.572 2.979 0.964 0.144 0.520 0.231 0.556 1.462 0.888 0.843 0.728 -0.508 0.308 -0.637 0.196 1.269 0.800 0.534 0.652 -0.342 0.324 0.164 0.456 -1.023 0.212 0.611 0.712 0.329 0.576 2.476 0.920 -0.198 0.428 0.154 0.520 -0.161 0.364 0.198 0.520 0.502 0.684 1.138 0.848 -0.266 0.452 -1.077 0.080 0.340 0.540 0.015 0.480 0.309 0.608 0.968 0.788 0.589 0.648 -0.869 0.192 0.655 0.664 -1.566 0.036 -1.521 0.060 0.273 0.608 -1.270 0.072 2.160 0.904 -0.855 0.252 -1.121 0.108 0.834 0.744 0.944 0.732 0.342 0.620 1.105 0.812 -0.862 0.152 0.562 0.748 -1.021 0.092 -0.569 0.288 -0.272 0.328 0.289 0.612 2.235 0.916 -0.595 0.280 -0.487 0.264 -0.755 0.184 0.429 0.592 -1.712 0.064 -1.945 0.112 0.538 0.660 -0.285 0.404 0.280 0.564 -0.442 0.320 0.936 0.744 0.101 0.576 2.294 0.884 -0.702 0.188 -0.281 0.356 -0.790 0.208 0.307 0.628 1.904 0.908 -0.663 0.292 0.879 0.752 -0.930 0.172 -0.014 0.412 0.546 0.636 0.199 0.536 -0.996 0.164 -0.615 0.252 -0.377 0.372 3.053 0.884 -0.233 0.452 0.127 0.468 -0.404 0.328 -1.082 0.200 1.277 0.852 -0.837 0.232 1.921 0.888 1.175 0.836 -0.238 0.388 -0.361 0.344 -0.202 0.308 3.016 0.964 -1.572 0.036 0.438 0.620 -0.057 0.452 1.577 0.844 -0.501 0.300 -0.537 0.268 1.599 0.884 -0.531 0.244 -1.506 0.028 -0.093 0.476 1.510 0.880 0.404 0.656 0.045 0.548 -0.821 0.152 1.358 0.788 -0.307 0.316 -1.460 0.044 -0.380 0.312 -0.248 0.352 -0.794 0.152 0.107 0.516 0.533 0.664 0.412 0.572 -1.150 0.120 -0.906 0.180 -0.232 0.332 0.672 0.640 1.328 0.876 -0.814 0.228 -0.962 0.128 0.484 0.672 -0.550 0.256 -1.716 0.036 -0.381 0.248 3.577 0.984 1.080 0.832 0.980 0.748 0.248 0.624 0.097 0.516 1.662 0.848 -1.761 0.052 -0.983 0.156 3.283 0.920 -0.243 0.388 -1.203 0.116 1.693 0.924 0.339 0.632 -1.719 0.028 1.984 0.916 -1.866 0.080 -0.696 0.228 2.025 0.924 1.700 0.904 0.144 0.512 -0.956 0.144 -1.384 0.056 0.345 0.628 0.900 0.728 1.201 0.820 -0.455 0.276 -0.714 0.260 0.235 0.572 -1.419 0.060 1.621 0.912 2.301 0.932 0.615 0.708 -1.681 0.032 0.459 0.624 -0.178 0.424 1.130 0.812 -0.708 0.228 -1.745 0.036 1.357 0.872 -0.143 0.444 -0.307 0.380 2.208 0.944 -0.565 0.236 -1.516 0.092 -1.410 0.056 -0.455 0.332 0.864 0.716 -1.704 0.100 2.354 0.964 -1.185 0.080 -0.787 0.164 2.212 0.920 -0.449 0.244 -1.067 0.124 -0.994 0.136 3.940 0.988 -0.737 0.212 1.044 0.812 0.282 0.564 -0.305 0.380 -1.340 0.124 0.071 0.508 0.373 0.580 0.734 0.668 1.532 0.808 -0.124 0.400 0.392 0.584 1.058 0.772 0.931 0.792 1.847 0.940 0.824 0.764 1.472 0.892 -0.251 0.384 1.035 0.756 0.143 0.540 -0.320 0.360 2.331 0.960 -0.582 0.232 0.914 0.668 -0.580 0.296 2.503 0.868 0.033 0.564 -0.085 0.400 0.383 0.600 1.374 0.864 0.346 0.568 1.878 0.888 2.702 0.964 2.039 0.864 0.390 0.636 -0.777 0.248 0.288 0.544 -1.198 0.096 -0.146 0.452 1.027 0.812 -0.760 0.184 0.108 0.500 -0.192 0.380 -0.195 0.432 1.977 0.940 1.711 0.904 -1.150 0.092 1.119 0.832 0.949 0.792 1.467 0.828 -1.438 0.100 -0.044 0.404 0.505 0.652 0.271 0.568 0.191 0.556 0.498 0.644 0.847 0.720 0.209 0.580 -0.319 0.360 -1.090 0.128 0.676 0.744 -0.912 0.144 0.665 0.680 -0.783 0.224 0.769 0.740 -1.674 0.048 -0.634 0.248 1.131 0.828 0.666 0.672 -0.451 0.252 0.271 0.576 0.740 0.684 0.090 0.484 -0.496 0.252 -0.285 0.316 1.476 0.860 1.497 0.868 0.067 0.432 0.121 0.508 3.213 0.864 -0.194 0.408 0.692 0.712 -0.519 0.252 -1.203 0.100 0.583 0.688 1.374 0.884 -0.582 0.248 -0.091 0.432 -0.143 0.420 -0.599 0.260 0.432 0.620 -1.553 0.084 0.539 0.656 -0.355 0.344 0.294 0.600 1.056 0.720 -0.980 0.112 0.717 0.716 0.395 0.632 -0.460 0.308 0.910 0.792 1.136 0.816 -0.167 0.400 -0.718 0.184 0.914 0.812 1.916 0.900 0.743 0.712 0.084 0.476 -1.222 0.116 1.963 0.900 -0.924 0.132 0.141 0.572 0.051 0.492 -0.518 0.268 -0.046 0.388 0.119 0.460 1.606 0.780 -1.401 0.040 2.684 0.960 -0.427 0.344 0.726 0.704 1.054 0.780 0.271 0.564 0.352 0.604 0.970 0.800 1.396 0.832 2.602 0.944 0.222 0.508 -1.753 0.068 0.393 0.612 -0.567 0.220 2.108 0.912 0.118 0.492 2.223 0.912 -0.611 0.312 0.148 0.508 2.778 0.896 0.735 0.708 0.525 0.672 -0.268 0.300 -0.198 0.392 -0.197 0.420 11.599 0.996 -0.329 0.372 -0.181 0.440 -1.069 0.108 -0.569 0.256 -0.270 0.348 0.257 0.608 -0.351 0.356 -0.392 0.344 -0.686 0.204 0.457 0.664 1.620 0.928 1.429 0.888 0.598 0.636 0.646 0.668 2.532 0.940 1.214 0.784 -0.407 0.392 -2.367 0.056 -2.385 0.008 -0.155 0.412 2.218 0.904 -0.785 0.212 -1.280 0.112 1.108 0.820 0.130 0.516 -0.766 0.204 0.403 0.604 0.027 0.500 -0.979 0.120 0.458 0.624 -0.942 0.212 0.945 0.736 1.439 0.888 1.938 0.836 -0.169 0.348 -0.522 0.268 -0.254 0.384 0.333 0.580 0.377 0.600 2.680 0.980 0.527 0.656 2.282 0.964 -1.032 0.116 0.709 0.684 1.423 0.800 -1.590 0.076 0.077 0.564 0.634 0.616 -0.508 0.224 -1.112 0.132 1.383 0.836 0.178 0.600 -0.332 0.384 3.285 0.904 0.532 0.628 -1.336 0.112 0.239 0.600 1.150 0.836 0.172 0.436 -0.253 0.376 -0.929 0.164 0.360 0.572 0.434 0.580 2.318 0.908 0.087 0.544 0.305 0.596 0.048 0.456 0.204 0.592 -0.658 0.220 0.860 0.708 -1.662 0.120 3.368 0.984 -0.639 0.252 0.048 0.536 0.164 0.552 1.989 0.924 -2.212 0.004 0.612 0.672 -0.917 0.124 0.189 0.496 -1.585 0.056 -0.091 0.444 -1.178 0.104 -1.206 0.160 -0.253 0.392 1.784 0.884 -0.620 0.240 -0.424 0.384 0.663 0.712 0.594 0.724 -0.572 0.188 1.857 0.916 1.158 0.768 1.150 0.820 -1.758 0.024 3.633 0.976 2.310 0.956 1.666 0.868 -1.069 0.108 -0.148 0.360 1.539 0.876 -0.433 0.336 -0.207 0.404 2.368 0.908 -0.758 0.184 0.106 0.544 0.702 0.736 -1.089 0.116 -0.097 0.476 0.929 0.796 0.870 0.720 -0.402 0.292 -1.631 0.080 0.666 0.612 0.069 0.472 -0.611 0.300 -0.239 0.360 0.557 0.688 0.314 0.524 -0.620 0.288 0.297 0.552 0.639 0.612 0.336 0.580 0.167 0.496 1.978 0.920 0.111 0.532 -1.199 0.072 0.214 0.604 0.043 0.488 1.525 0.900 -0.133 0.404 -0.915 0.140 4.312 0.980 0.019 0.476 -0.274 0.312 1.667 0.800 2.133 0.920 0.486 0.640 1.329 0.848 -1.314 0.064 0.681 0.700 6.797 0.988 -0.122 0.416 -0.097 0.396 -1.186 0.148 4.301 0.976 0.472 0.664 -0.542 0.304 -0.558 0.332 -0.767 0.152 -0.071 0.412 0.660 0.620 0.032 0.524 0.489 0.612 -0.658 0.256 -0.001 0.500 -0.344 0.332 0.356 0.544 0.093 0.532 0.988 0.768 -0.215 0.392 1.478 0.816 -0.745 0.212 0.324 0.624 1.159 0.772 1.183 0.784 0.069 0.500 -2.341 0.016 0.821 0.728 1.557 0.924 -0.417 0.320 0.423 0.568 -1.048 0.112 -0.201 0.408 -1.616 0.092 0.977 0.740 -0.061 0.428 -0.359 0.360 0.030 0.444 0.206 0.544 -1.570 0.052 -1.882 0.024 -0.310 0.348 -0.200 0.440 -0.927 0.132 -0.140 0.416 6.426 0.988 1.455 0.796 -0.467 0.344 0.214 0.536 0.121 0.504 -1.076 0.112 -0.523 0.260 -0.238 0.388 -0.188 0.432 -0.308 0.300 -0.548 0.224 2.200 0.904 -1.019 0.148 -0.086 0.452 0.715 0.708 0.513 0.676 -0.916 0.188 0.509 0.724 -0.777 0.184 -1.028 0.120 -0.163 0.348 1.825 0.912 0.936 0.788 -0.847 0.236 0.948 0.756 -0.166 0.424 -0.459 0.304 -0.244 0.404 0.668 0.664 0.201 0.544 -1.586 0.048 -0.248 0.352 0.501 0.636 -0.027 0.404 -0.994 0.120 1.553 0.900 0.986 0.804 0.395 0.664 0.326 0.612 -0.579 0.208 0.004 0.508 -0.610 0.192 0.061 0.348 0.150 0.516 1.833 0.940 -0.172 0.476 -0.411 0.344 1.312 0.824 -0.249 0.436 1.583 0.872 -0.746 0.136 0.334 0.552 2.246 0.968 -0.298 0.344 -0.213 0.432 -0.665 0.212 2.006 0.912 1.653 0.872 0.621 0.676 -1.736 0.036 -0.283 0.376 -0.038 0.472 2.060 0.928 1.043 0.776 6.828 0.996 -1.116 0.112 0.452 0.616 0.115 0.484 2.737 0.932 0.372 0.608 2.498 0.944 -0.535 0.312 -0.350 0.340 -1.899 0.036 1.397 0.792 -0.023 0.488 0.546 0.664 0.398 0.596 -0.793 0.212 -0.708 0.216 -0.011 0.476 -0.493 0.256 -2.167 0.052 -0.876 0.164 0.637 0.728 -0.946 0.148 -0.836 0.156 2.177 0.888 1.402 0.820 -0.666 0.236 0.110 0.388 3.174 0.952 -0.888 0.164 0.418 0.596 1.639 0.872 0.866 0.772 -0.705 0.176 1.089 0.760 -0.145 0.424 -0.421 0.392 1.982 0.920 0.108 0.532 1.156 0.812 1.580 0.780 -0.537 0.312 1.897 0.916 -0.763 0.212 -0.625 0.244 2.069 0.952 -0.151 0.420 0.688 0.720 -0.599 0.260 0.853 0.744 -0.767 0.192 0.541 0.620 -0.647 0.228 2.548 0.968 -1.238 0.112 -0.327 0.380 0.030 0.544 1.425 0.852 -0.703 0.212 1.248 0.836 1.115 0.816 1.333 0.792 -0.380 0.304 -0.870 0.188 1.067 0.756 -0.985 0.088 -0.339 0.296 -1.463 0.052 0.341 0.560 -0.204 0.388 0.577 0.596 -0.792 0.208 0.084 0.492 -1.002 0.172 -1.224 0.064 0.792 0.716 0.704 0.656 1.208 0.828 -0.087 0.440 -1.072 0.180 -0.998 0.144 2.540 0.960 -0.360 0.272 1.549 0.900 -1.793 0.016 -0.449 0.316 0.006 0.492 -0.005 0.480 -1.018 0.088 2.047 0.916 0.095 0.492 0.943 0.752 0.291 0.596 -1.024 0.128 0.944 0.812 0.033 0.540 1.268 0.792 0.449 0.644 3.289 0.988 2.087 0.884 0.504 0.640 1.161 0.832 1.523 0.840 -1.057 0.120 -0.078 0.532 -0.870 0.176 0.047 0.520 1.706 0.888 0.568 0.604 0.811 0.776 -1.592 0.120 0.475 0.664 -0.939 0.112 -0.053 0.416 5.270 0.988 2.233 0.924 -0.819 0.168 -1.034 0.112 -0.247 0.368 0.981 0.764 0.165 0.564 -0.813 0.208 0.190 0.568 -0.454 0.288 0.607 0.668 -0.665 0.260 -0.138 0.412 0.347 0.624 3.328 0.940 1.128 0.784 2.335 0.968 1.273 0.844 -0.154 0.396 -0.054 0.432 -0.517 0.236 0.174 0.564 0.088 0.536 -0.590 0.224 0.459 0.644 0.732 0.704 3.150 0.956 -0.489 0.292 0.012 0.488 0.575 0.644 -0.111 0.448 3.006 0.924 -0.496 0.236 0.673 0.672 0.842 0.756 0.440 0.668 -0.301 0.416 0.401 0.584 3.002 0.972 -0.458 0.312 1.929 0.904 1.385 0.836 -1.517 0.076 -1.178 0.120 -1.057 0.092 0.349 0.612 -0.500 0.264 -1.323 0.084 -0.543 0.272 1.251 0.848 -0.427 0.336 1.248 0.812 2.041 0.912 -1.427 0.040 -2.134 0.012 -0.188 0.380 -0.970 0.136 -1.005 0.136 -0.121 0.412 0.314 0.596 -1.833 0.044 0.141 0.540 2.007 0.944 1.716 0.856 2.131 0.908 -0.313 0.360 -0.232 0.420 0.008 0.472 -0.782 0.156 -0.456 0.300 -0.423 0.308 -0.371 0.304 -0.156 0.468 1.309 0.844 1.077 0.800 -0.766 0.168 -0.628 0.268 -0.713 0.204 -0.521 0.252 1.767 0.880 0.569 0.604 -0.024 0.504 4.942 0.916 -0.051 0.432 -0.326 0.336 0.816 0.704 -0.295 0.356 0.207 0.592 0.961 0.772 3.595 0.980 0.942 0.756 0.072 0.496 1.819 0.872 0.758 0.688 8.778 0.984 -0.598 0.292 1.979 0.924 -0.381 0.236 -0.367 0.284 -0.537 0.300 0.937 0.768 1.641 0.808 -0.400 0.332 0.175 0.540 0.514 0.704 0.284 0.540 2.383 0.856 1.450 0.812 0.557 0.660 0.128 0.508 -0.692 0.180 0.853 0.800 -0.936 0.128 2.212 0.924 -0.033 0.456 0.831 0.700 -0.024 0.460 0.957 0.776 -0.323 0.328 1.112 0.784 -0.060 0.412 -0.108 0.412 -1.699 0.040 1.583 0.832 0.335 0.572 -1.355 0.084 -1.408 0.116 -0.629 0.240 0.121 0.492 0.449 0.656 -1.767 0.100 -0.502 0.236 0.015 0.452 0.013 0.484 0.807 0.732 -1.236 0.088 0.545 0.688 1.738 0.916 -1.314 0.068 1.060 0.876 0.348 0.660 1.032 0.816 -1.209 0.084 -0.504 0.292 -1.395 0.052 1.774 0.864 -0.165 0.452 -0.271 0.396 1.471 0.844 -0.256 0.384 -0.758 0.228 -1.859 0.036 0.001 0.528 -0.098 0.412 -2.176 0.012 -1.416 0.084 -0.705 0.184 -0.696 0.200 0.211 0.596 1.841 0.908 -0.722 0.240 0.842 0.756 0.656 0.652 0.295 0.640 -2.105 0.020 -0.479 0.204 2.837 0.948 1.985 0.888 -0.200 0.400 1.560 0.860 1.135 0.836 -0.601 0.216 -0.639 0.220 2.231 0.920 -2.118 0.116 0.693 0.740 -1.787 0.008 1.723 0.872 2.110 0.896 0.045 0.444 0.480 0.576 0.325 0.616 -0.360 0.408 -0.487 0.328 0.985 0.712 -0.175 0.396 0.100 0.500 1.248 0.788 0.435 0.620 -0.718 0.220 -1.187 0.108 -0.192 0.396 -0.838 0.156 0.023 0.512 -0.469 0.256 -0.096 0.440 -0.805 0.200 0.294 0.584 2.222 0.956 0.542 0.696 -0.686 0.312 -0.696 0.172 0.669 0.652 0.258 0.580 -1.389 0.048 -0.927 0.140 0.535 0.660 -0.717 0.128 -0.741 0.208 -0.749 0.216 -0.586 0.236 2.391 0.928 -0.843 0.188 -0.338 0.380 -1.137 0.104 -1.279 0.068 -0.272 0.344 0.731 0.748 1.470 0.840 0.730 0.760 0.550 0.708 -1.340 0.068 -1.243 0.068 0.198 0.520 0.728 0.744 -0.098 0.360 -1.113 0.116 -0.860 0.164 -0.662 0.160 -0.221 0.428 1.247 0.792 0.565 0.720 -1.304 0.104 2.031 0.896 1.163 0.792 1.361 0.824 -0.579 0.256 junk1 <- scan(file="",list(i=0,base=0,one=0),nmax=60) 1 2.12 2.47 2 4.35 4.61 3 3.39 5.26 4 2.51 3.02 5 4.04 6.36 6 5.10 5.93 7 3.77 3.93 8 3.35 4.09 9 4.10 4.88 10 3.35 3.81 11 4.15 4.74 12 3.56 3.29 13 3.39 5.55 14 1.88 2.82 15 2.56 4.23 16 2.96 3.23 17 2.49 2.56 18 3.03 4.31 19 2.66 4.37 20 3.00 2.40 cd4.nested <- boot:::boot.return(sim="ordinary", t0=c(0,0.532), t=cbind(junk[[1]],junk[[2]]), strata=rep(1,20), R=999, data=data.frame(baseline=junk1$base,oneyear=junk1$one), stat=temp$statistic, stype="w", call=tempcl, seed=NULL, m=0, weights=rep(0.05,20)) rm(junk,junk1,temp,tempcl) save(cd4.nested, file="cd4.nested.rda", compress=TRUE)