On Jun 22, 2010, at 2:14 PM, Johannes Huesing wrote:
Jim Hargreaves <ja...@ipec.co.uk> [Mon, Jun 21, 2010 at 12:34:01PM
CEST]:
Dear List,
I have a list of length ~1000 filled with numerics. I need to
replace the elements of this list that are above a certain numerical
threshold with the value of the threshold.
e.g
example=list(1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 9, 8, 7, 6, 5, 4, 3, 2,
1)
threshold=5
<magic code goes here>
example=(1, 2, 3, 4, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 4, 3, 2, 1).
lapply(example, min, 5)
Perhaps wrapped in unlist( ) if a vector is desired.
The same strategy would work with pmin and probably be faster (albeit
not a big deal if the list is only 1000 elements long:
unlist( pmin(example, 5) )
--
Johannes Hüsing
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.