search for: nkid

Displaying 4 results from an estimated 4 matches for "nkid".

Did you mean: nid
2004 Jul 15
0
indexing a parameter in nls
...1 and f2 (with no intercept). The p-parameter indicates the relative impact of the two factors on Y. If p=.5, f1 and f2 have equal impact, for p>.5, f1 has greater impact, for p<.5 f2 has greater impact. I can estimate the model as follows for f1="row", f2="col", Y="nkids": rd<-model.matrix(~as.factor(row)-1) cd<-model.matrix(~as.factor(col)-1) strt<-list(m1=2,m2=2,m3=2,m4=2,m5=3,p=.5) nls(nkids~p*(rd[,1]*m1+rd[,2]*m2+rd[,3]*m3+rd[,4]*m4+rd[,5]*m5) + (1-p)*(cd[,1]*m1+cd[,2]*m2+cd[,3]*m3+cd[,4]*m4+cd[,5]*m5), start=strt) --- What I want...
2008 Nov 07
2
Vectorizing sample()
I am simulating sickness among a group of families. Part of the task is to randomly draw who in the family will be sick, randomly drawing from family ID's where Dad =1, Mom = 2, Kid1 = 3, Kid2 = 4., etc. My census of Dads is of the form shown below. Dad_ID Spouse (Y=1;N=0) #Kids #People_Becoming_Sick 1 1 0 1 2
2001 Nov 05
1
Why doesn't outer work?
...x2<-p.vec[7]; sigmax<-sqrt(sigmax2); mux<-p.vec[5]+p.vec[6]*x; fac1<-sqrt(2*pi)*sigmax; fac2<-((y-mux)^2)/(2*sigmax2); return(exp(-fac2)/fac1); } #survival-growth function pxy<-function(x,y) { return(sx(x)*(1-fx(x))*gxy(x,y)) } #fecundity function fxy<-function(x,y) { nkids<-p.est*exp(p.vec[8]+p.vec[9]*x); kidsize.mean<- p.vec[10]; kidsize.var<- p.vec[11]; fac1<-sqrt(2*pi)*sqrt(kidsize.var); fac2<-((y-kidsize.mean)^2)/(2*kidsize.var); f<-fx(x)*nkids*exp(-fac2)/fac1; return(f); } # Part (III) ##################################################...
2003 Jul 02
2
Domain Member server and W2kServer
i'm currently running samba 2.2.8a as a domain member server to an NT4Server.... no problems will be upgrading the PDC to a W2K server next week... there isn't a need to use LDAP with Samba with W2KServer is there ? I can still go with my current setup can I ?