Displaying 2 results from an estimated 2 matches for "populacional".
2010 Jul 24
1
Doubt about a population competition function
...populations in competition.
that's the function that i wrote:
exclusao<-function(n10, n20, k1, k2, alfa, beta, t){
n1<-k1-(alfa*n20)
n2<-k2-(beta*n10)
if(t==0){plot(t, n10, type='b', xlim=range(c(1:t),c
(1:t)), ylim=range(n10, n20), xlab='tempo',
ylab='tamanho populacional')
points(t, n20, type='b', col="red")
points(t,n10,type="b", col="black")
legend("topleft", c("Pop1","Pop2"), cex=0.8, col=c
("black","red"), pch=21:21, lty=1:1);
}
if(t>0){
for (i in 1:t){
n1[i==1]<-...
2010 Jul 26
1
After writing data in MMF using SEXP structure, can i reference in R?
...that's the function that i wrote:
exclusao<-function(n10, n20, k1, k2, alfa, beta, t){
n1<-k1-(alfa*n20)
n2<-k2-(beta*n10)
if(t==0){plot(t, n10, type='b', xlim=range(c(1:t), c
(1:t)), ylim=range(n10, n20), xlab='tempo',
ylab='tamanho populacional')
points(t, n20, type='b', col="red")
points(t, n10, type="b", col="black")
legend("topleft", c("Pop1", "Pop2"), cex=0.8, col=c
("black", "red"), pch=21:21, lty=1:1);
}
if(t>...