Displaying 1 result from an estimated 1 matches for "matemot".
Did you mean:
atempt
2006 Apr 01
0
help with vectorizing a function
...ol=2)
abline(lm(y ~ x))
metamat<-c( 0, 1, 0, 1, 0, 1, 0, 1, 0, 0, 1, 0,
1, 0, 1, 0, 0, 0, 0, 1, 0, 1, 0, 0,
0, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 0,
1, 0, 1, 1, 0, 0, 1, 1, 1, 1, 1, 0,
0, 0, 0, 1, 1, 1, 0, 0, 0, 0, 0, 0,
1, 0, 0, 0)
matemot<-c( 0, 0, 1, 0, 1, 0, 1, 0, 0, 0, 1, 0,
1, 0, 1, 0, 0, 0, 0, 1, 0, 1, 0, 0,
0, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 0,
1, 0, 1, 1, 0, 0, 1, 1, 1, 1, 1, 0,
0, 0, 0, 1, 1, 1, 0, 0, 0, 0, 0, 0,
1, 0, 0, 0)
par(cex=.8, pch=15)
for(j in seq(-46,...