Hi again.
I realized that the example I give is not valid, because the number I'm using
is not an integer (ex. 50.1).
So I thought using
is.between = function(x, a, b) { (x - a) * (b - x) > 0}
But I'm not sure how to use it with lapply to avoid looping in my code.
Regards,Phil
> From: pmassico...@hotmail.com
> To: r-help@r-project.org
> Date: Fri, 22 Nov 2013 18:17:03 +0000
> Subject: Re: [R] data manipulation
>
> Thank you everyone for your suggestions.
>
> > Date: Fri, 22 Nov 2013 18:04:16 +0000
> > From: pbu...@pburns.seanet.com
> > To: pmassico...@hotmail.com; r-help@r-project.org
> > Subject: Re: [R] data manipulation
> >
> > The final ")" went missing in the command
> > starting 'names(neutralVec) <- '.
> >
> > On 22/11/2013 17:51, Patrick Burns wrote:
> > > I think a list is the wrong structure,
> > > a vector would be better since you can
> > > use 'match':
> > >
> > > # transform data structure:
> > > neutralVec <- unlist(neutral_classes)
> > >
> > > names(neutralVec) <-
> > > names(neutral_classes[rep(1:length(neutral_classes),
> > > sapply(neutral_classes, length))]
> > >
> > > # get one or more results with 'match':
> > > names(neutralVec[match(c(50, 20, 10, -4), neutralVec)])
> > >
> > > # result:
> > > # [1] "B" "D" "D" NA
> > >
> > >
> > > Pat
> > >
> > >
> > > On 22/11/2013 16:58, philippe massicotte wrote:
> > >> Hi everyone.
> > >> I have a list like this:
> > >> neutral_classes = list(A = 71:100, B = 46:70, C = 21:45, D = 0:20)
> > >> and I'm trying to return the letter of the named vector for with an
> > >> integer belong. For example, B if I use the value 50.
> > >> Any help would be greatly appreciated.
> > >> Regards,Phil
> > >> [[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.
> > >>
> > >
> >
> > --
> > Patrick Burns
> > pbu...@pburns.seanet.com
> > twitter: @burnsstat @portfolioprobe
> > http://www.portfolioprobe.com/blog
> > http://www.burns-stat.com
> > (home of:
> > 'Impatient R'
> > 'The R Inferno'
> > 'Tao Te Programming')
>
> [[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.
[[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.
