Hi. I tried the following:
F<-function(x,y,b1,b2,b3) b1/(1+b2*(x+b3*y));
t<-data.frame(ExM=c(T$ExM,F(T$S1,T$S2,0.2,0.2,51.28205)),S1=rep(T$S1,2),S2=rep(T$S2,2),gr=c(rep(1,length(T$ExM)),rep(2,length(T$ExM))));
library(lattice);
wireframe(ExM ~ S1 * S2, data = t, groups=gr);
where T is da dataframe like T<-data.frame(S1=...,S2=...,ExM=...)
But the resulting response surface plot is mixed up, ie it is not two seprate
surfaces as it should be. I know that as I have plotted them both seperately as
well.
Can anyone see what I am doing wrong?
Thanks!
Lars
_________________________________________________________________
s. It's easy!
aspx&mkt=en-us
[[alternative HTML version deleted]]
______________________________________________
[email protected] mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.
