On May 30, 2012, at 1:04 PM, ilai wrote:

If you haven't done so you *must* read an Introduction to R. The only
reason this is a problem is Myarray is a character string, not a function
or expression to be evaluated. I think this will get you what you want
though:

# In the future use the output of ?dput to provide data to this list
(MyMatrix <- structure(c(10, 20, 30, 40, 50, 60, 70, 80, 90), .Dim = c(3L,
3L), .Dimnames = list(NULL, c("ABC", "PQR", "XYZ"))))

# DO NOT use rich font !!! in plain text it adds '*' to the bold names
which is more than annoying...
MyArray <-  c("ABC>50","PQR<50","ABC<30 & XYZ<40")

# finally the answer:
sapply(MyArray,function(x) eval(parse(text=x),as.data.frame(MyMatrix)))

Here's another approach. It involves creating an expression vector and then evaluating on a named list argument:

> exprvec <- expression(ABC > 50, PQR < 50, ABC < 30 & XYZ < 40)
> (MyVals2 <- list(ABC =c(10, 20, 30), PQR =c(40, 50, 60), XYZ=c( 70, 80, 90)) )
$ABC
[1] 10 20 30

$PQR
[1] 40 50 60

$XYZ
[1] 70 80 90

> sapply(exprvec, function(ep) with(MyVals2, eval(ep )) )
      [,1]  [,2]  [,3]
[1,] FALSE  TRUE FALSE
[2,] FALSE FALSE FALSE
[3,] FALSE FALSE FALSE

There can be problems with using `with` inside functions and I'm not smart enough to know why I'm able to get away with it here.

--
David

HTH

On Wed, May 30, 2012 at 12:44 AM, Rantony <antony.akk...@ge.com> wrote:

Hi,

I am new in R,

i have a matrix like this

MyMatrix <-
*ABC   PQR    XYZ*
10       20        30
40       50        60
70       80        90

And, i have an array containing some conditions like this,
MyArray <-  c("*ABC*>50","*PQR*<50","*ABC*<30 &* XYZ*<40")

"ABC>50"
"PQR<50"
"ABC<30 & XYZ<40"

My purpose what is, i need to check this conditions in *MyArray* with
*MyMatrix* value for particular column

How it is possible ?

- Thanks
Antony.

--
View this message in context:
http://r.789695.n4.nabble.com/Separate-Array-Variable-Content-tp4631800.html
Sent from the R help mailing list archive at Nabble.com.

______________________________________________
R-help@r-project.org 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.


        [[alternative HTML version deleted]]

______________________________________________
R-help@r-project.org 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.

David Winsemius, MD
West Hartford, CT

______________________________________________
R-help@r-project.org 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.

Reply via email to