search for: ex12

...Simple' length--1 expressions: ex1 <- expression(hat(beta) == (X^t * X)^{-1} * X^t * y) ex2 <- expression(bar(x) == sum(over(x[i], n), i==1, n)) ex3 <- expression(paste(over(1, sigma*sqrt(2*pi)), " ", plain(e)^{over(-(x-mu)^2, 2*sigma^2)})) ##-- A length--2 expression: ex12 <- expression(bar(x) == sum(over(x[i], n), i==1, n), hat(x) == median(x[i], i==1,n)) mode(ex12) # expression length(ex12)# 2 mode(ex12 [1]) # expression mode(ex12[[1]]) # call length(ex12[1])# 1 ex12 == ex12[1:2] #> TRUE TRUE mode(c(ex1,ex2))#> "list" --->> Thi...

...ing matplot, but I cannot get exactly what I want. This is what I get, and this is my code: matplot(x[,1],x[,-1],type='b', xlab = "epsilon_h", ylab = "Value2", xlim= range(-4500,-100), col = c("blue","green","red"), pch=1:3) ex12 <- expression(V(h == 40), V(h==20), V(h==0)) legend("topright", ex12, col = c("blue","green","red"), pch=1:3) I would like to make the lines extend so I can see the intersections. The other, fancier and better looki...

A non-text attachment was scrubbed... Name: not available Type: text Size: 478 bytes Desc: not available Url : https://stat.ethz.ch/pipermail/r-help/attachments/19971103/ae2f1119/attachment.pl