I guess what you want is: a <- abs(a) floor( a / 10^floor( log10( a ) ) )
Bendix ---------------------- Bendix Carstensen Senior Statistician Steno Diabetes Center Niels Steensens Vej 2 DK-2820 Gentofte Denmark tel: +45 44 43 87 38 mob: +45 30 75 87 38 fax: +45 44 43 07 06 [EMAIL PROTECTED] www.biostat.ku.dk/~bxc ---------------------- > -----Original Message----- > From: [EMAIL PROTECTED] > [mailto:[EMAIL PROTECTED] On Behalf Of Manica > Sent: Friday, March 12, 2004 3:15 PM > To: [EMAIL PROTECTED] > Subject: [R] help > Importance: High > > > I want to extract the first non-zero digit of any vector, as > for example from a<-runif(100,0,1). Tried it using grep (...) > but didnīt work. > > Any help is very much appreciated. > Thanks, > Manica > > > -- > visite > http://ipimar-iniap.ipimar.pt/neomav/ > > ______________________________________________ > [EMAIL PROTECTED] mailing list > https://www.stat.math.ethz.ch/mailman/listinfo> /r-help > PLEASE > do read the posting guide! > http://www.R-project.org/posting-guide.html > ______________________________________________ [EMAIL PROTECTED] mailing list https://www.stat.math.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide! http://www.R-project.org/posting-guide.html