#this is my stab at - I am sure that I am missing something.  If this
doesn't make sense then please ask for more details.  #This may show
my low level of programing knowledge

hester. <- c(1,1,1,1,2,2,2,2,3,3,3,3,4,4,4,4)
value <- rnorm(16)
x <- data.frame(value, hester.)

z <-
(if(x[,"hester."]==1){
x[,"value"]*6.250}
else
if(x[,"hester."]==2){
x[,"value"]*3.125}
else
if(x[,"hester."]==3){
x[,"value"]*2.100}
else
if(x[,"hester."]==4){
x[,"value"]*1.600})

thanks

stephen

-- 
Stephen Sefick
Research Scientist
Southeastern Natural Sciences Academy

Let's not spend our time and resources thinking about things that are
so little or so large that all they really do for us is puff us up and
make us feel like gods.  We are mammals, and have not exhausted the
annoying little problems of being mammals.

                                                                -K. Mullis

______________________________________________
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