search for: rij

...ep(-N:N, times = reps)), > nrow = 2, byrow = TRUE) > } > rj<-positions(N)*spacing # all positions in the 2N x 2N array > rj<-rj[1:2,-((dim(rj)[2]-1)/2+1)] # remove rj=(0,0) > > mod<-function(x){sqrt(x[1]^2+x[2]^2)} # modulus > > sij <-function(rj){ > rij=mod(rj-ri) > cos_ij=rj[1]/rij > sin_ij=rj[2]/rij > > A<-(1-1i*k*rij)*(3*cos_ij^2-1)*exp(1i*k*rij)/(rij^3) > B<-k^2*sin_ij^2*exp(1i*k*rij)/rij > > sij<-A+B > } > > s_ij<-apply(rj,2,sij) > S<-sum(s_ij) > alpha_s/(1-alpha_s*S) > } > alpha_c()...

...phai_ADD(i),solve(sigma))) } sigmaDERIVisigma_MIX <- function(sigma,i) { crossprod(solve(sigma),crossprod(dsigma.dalphai_MIX(sigma,i),solve(sigma))) } sigmaDERIVisigma_EXP <- function(sigma,i) { crossprod(solve(sigma),crossprod(dsigma.dalphai_EXP(sigma,i),solve(sigma))) } # zav?dza pi, qij, rij (iba pre zmie?an? a multiplikat?vny model heteroskedasticity) pi_ADD <- function(sigma,i) -1*crossprod(x,crossprod(sigmaDERIVisigma_ADD(sigma,i),x)) pi_MIX <- function(sigma,i) -1*crossprod(x,crossprod(sigmaDERIVisigma_MIX(sigma,i),x)) pi_EXP <- function(sigma,i) -1*crossprod(x,crossprod(...

...te2_max1 = 2.30 rate2_min2  = 2.30 rate2_max2 = 2.65 rate2_min3  = 2.65 rate2_max3 = 2.99   If there are say 10 rates, then this will continue till   rate10_min1 =  ...... rate10_max1 = ...... ......... so on.   ## ________________________________________________________   # PROBLEM - B   # Suppose Rij = ith Rate and jth range. (There are 3 ranges i.e. j= 3).   data_label = expand.grid(c("R11", "R12", "R13"), c("R21", "R23", "R23"))   # gives the output like     data_label      Var1        Var2 1    R11         R21 2    R12         R21 3...

...eader = [''Employee'',''Address'',''Zip'',''City'',''Start date'',''Start time'',''Stop date'', ''Stop time'',''Duration''] #headers afprinten op de 1ste rij 0.upto(@header.length - 1) do |i| ws1.write(0,i,@header[i], f1) end wb.close end this is my error: --------------------- WARNING: You have a nil object when you probably didn''t expect it! Odds are you want an instance of Array instead. Look in the callstack to see where you'...

I''m having difficulty getting my head around some CA issues My client has: [puppetd] ca_server=puppetca.mydomain.com and puppet resolves to a different machine. when puppet connects, it requests a signature from puppetca.mydomain.combut then on the next pass fails with the following: err: Could not retrieve catalog: Certificates were not trusted: SSL_connect returned=1 errno=0

Dear all, suppose I have a vector with elements as: Vec <- c(2,3,4,5,6) Now I want to have all possible combination of length 3 using those elements and without any repetition. Like, I want to have 1 possibility like 2-3-4 but not 3-2-4. Can somebody guide me how to achieve that in R? Thanks for your help.

Ok, I''ve been reading and I have some questions about best practices: I understand that modules are to be self contained blocks that i can just drop in. Using best practices, how does this fit into the naming scheme? Classes are singletons. I think i understand this. I''ve been defining classes in /etc/puppet/classes, but then how does this relate to any modules i might want

...}^Z4U2SbJ6iKQ)?DoW62{_Pm z`K`zy?DGJ`GHgm0o6^L3CQ^qb)g5k5|0*v|5SPZiC+X5ChodY|0>8g5>?jMF5xrdO z1kQl3GGekgt<Uk^h}ZB$EOw{xsLgy3?V|FX3iHUoh}dmpnG4cPn3cg#hl`Ewl>1yE zaWpkEQB)jOSlFuA?h|5GyUZiI=dhb}mj&U;R9l0wd*`q#=jLOQislJ|NP1Y~#=651 z-YlBkm at jRJPmt2Um|r91dkH(@^h9%==3R=IkgVtw#c0vnHS0N!(^rkrijRdA;shS( zC7#3l)@KgeEt8))Ebq+_Ga=cW5pS7AbVMwtEkk}_>k-HA68_~KsN8Q}%|x#PE!ss# z1XF35>5Am~YCHq_w>BBXUT8VgIk5*rUE&@L>2jmuI63*eVV^GdFbY?}%dK~nI{dA= z+7z>dHO{=ax)L%n5>jH#UY<Y^MxoR7T`uAh_f!eiMxF~2PGZ)U((>2qlkcD8E at GNy zD&~!ud%JlF8e(RS%i5P at i5{`I9`IL}1r3-PVR6eN;=~|sY|`vII...