Displaying 1 result from an estimated 1 matches for "tp25848627p25849148".
2009 Oct 11
1
Function Help
Hi there,
I have created the function below:
pirate<-function(x){
a<-x-1; b<-a/5; c<-a-b;
d<-c-1; e<-d/5; f<-d-e;
g<-f-1; h<-g/5; i<-g-h;
j<-i-1; k<-j/5; l<-j-k;
m<-l-1; n<-m/5; o<-m-n;
final<-o/5;
final
}
I want to run this function until the output ('final') is an exact integer
(e.g. 893.00000 rather than 893.78332). I then need to