Raw Message

Message-ID: <BAY10-F303206AF04A6B0EE46602FC7530@phx.gbl>
Date: 2005-03-11T02:54:37Z
From: mirage sell
Subject: sample function

Hi everyone, I need help.
I want to have a "uniform" kind distribution. When I used sample function I 
got almost twice many zeros compared to other numbers. What's wrong with my 
command ?

temp <-sample(0:12, 2000, replace=T,prob=(rep(1/13,13)))
hist(temp)

Thanks in advance,

Taka,