Gives a mistake that "probability" is not found x<- runif(1,0,1) y<-x^5+x^8+(cos(x))^3 yrandom<- runif(10,0,3) if (y<yrandom) {probabibility=y/yrandom} area=probability*3 -- View this message in context: http://r.789695.n4.nabble.com/How-to-fix-it-tp4649955.html Sent from the R help mailing list archive at Nabble.com.