Displaying 2 results from an estimated 2 matches for "tzx".
Did you mean:
tx
2010 Feb 05
1
Incompatible types error
...-function(pi,rand,Et,mea){
(1/(2*pi*rand[i]))*exp((-(Et[i](Eztx[i],t,A,n))-mea)^2)/(2*(rand[i]^2))
}
prob(pi,rand[i],Et[i](Eztx[i],t,A,n),mea)
}
Tx[i]<-function(fx,cdist){
cdist[i] <-(1-((pnorm(Et[i](Eztx[i],t,A,n),mea,rand[i],))
-(pnorm(mea,mea,rand[i],))))
Tzx[i]<-fx[i](prob[i],rand[i],Et[i])*cdist[i]
Tzx[i]
}
}
Fitness[i]<-function(Tx){
f[i]<-Tx[i]
Fit[i]<-sum(f[i])
}
}
plot(Fit,rand)
"
--
View this message in context: http://n4.nabble.com/Incompatible-types-error-tp1470783p1470783.html
Sent from the R help mailing list...
2013 Apr 12
1
A strange behaviour in the graphical function "curve"
...a way that even R itself doesn't do. See what I'm
talking about:
# A function that returns a 2-element vector, given a
# single argument
zetas <- function(alpha) {z <- qnorm(alpha/2); c(z,-z)}
# A transformation function - it can take a vector as
# its z argument
Tzx <- function(z, sigma_p, mu_p) sigma_p*z + mu_p
# Another transformation function similar to the
# previous one - it can take a vector as its x argument
Txz <- function(x, sigma_p, mu_p) (x - mu_p)/sigma_p
# The general function with several arguments
BetaG <- function(mu,...