How about:

table(samp)

--
Robert Tirrell | rpt@stanford.edu | (607) 437-6532
Program in Biomedical Informatics | Butte Lab | Stanford University



On Thu, Feb 10, 2011 at 13:54, Nipesh Bajaj <bajaj141003@gmail.com> wrote:

> > set.seed(100)
> > samp <- sample(c(1,-1,0), 20, replace=T); samp
>

	[[alternative HTML version deleted]]

