Inline. On Fri, Jan 4, 2013 at 7:44 AM, Suzen, Mehmet <[email protected]> wrote:
> I am always reserved about types and not sure how R auto casting works > internally. > In a large code using many different packages, I think being reserved about > this would not hurt. > > Also, are there anyway to force R to be "strongly typed" similar to > Occaml etc... > Yes (I think). Use S4. See. e.g. Chambers: Software for Data Analysis" Programming in R -- Bert > > mem > > > On 4 January 2013 16:35, arun <[email protected]> wrote: > > > > As long as there are no negative numbers, method2 and 3 works: > > test[1]<- -1 > > length(which(test==0)) > > #[1] 6 > > length(which(test<1)) > > #[1] 7 > > length(which(test < .Machine$double.xmin)) > > #[1] 7 > > > > length(which(abs(test)<1)) > > #[1] 6 > > length(which(abs(test) < .Machine$double.xmin)) > > #[1] 6 > > A.K. > > > > > > > > > > ----- Original Message ----- > > From: "Suzen, Mehmet" <[email protected]> > > To: Hermann Norpois <[email protected]> > > Cc: R help <[email protected]> > > Sent: Friday, January 4, 2013 12:27 AM > > Subject: Re: [R] count appearence of zero in a vector > > > > Hi Hermann, > > > > You may want to use ?which, to store the index as well (might be handy > > in debugging or some other > > purposes if zeros has some special meaning) : > > > > test <- c(1, 1, 1 , 1 , 1, 1, 2, 1, 1, 1, 0, 2, 0, 1, 1, 0, 0, 0, 1, > > 1, 1, 0, 1, 2, 1, 1, 1, 1, 1, 1) > > length(which(test==0)) > > > > But be careful when using == 0. If you are sure that elements are all > > integers I prefer this > > > > length(which(test <1)). > > > > Or a safe tolerance value from .Machine, if you are dealing with double > numbers. > > > > length(which(test < .Machine$double.xmin)) > > > > > > -m > > > > ______________________________________________ > > [email protected] 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. > > > > ______________________________________________ > [email protected] 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. > -- Bert Gunter Genentech Nonclinical Biostatistics Internal Contact Info: Phone: 467-7374 Website: http://pharmadevelopment.roche.com/index/pdb/pdb-functional-groups/pdb-biostatistics/pdb-ncb-home.htm [[alternative HTML version deleted]] ______________________________________________ [email protected] 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.
