درخواست ماکرو تولید کننده چند عدد تصادفی با میانگین مورد نظر

**m_d6712** · 2012/05/24, 14:27

RE: درخواست ماکرو تولید کننده چند عدد تصادفی با میانگین مورد نظر

راستش خیلی سعی کردم سوالتون رو متوجه بشوم. هر طور نگاه کنیم ایراد داره.

اول باید بهمون بگی منظورت از کاملا تصادفی چیه؟ تصادفی یکنواخت؟

تا جایی که من میدونم هر تعداد عدد تصادفی یکنواخت بین دو عدد a و b میانگینی برابر با نصف b-a خواهد داشت. بنابراین میانگین در اختیار شما نیست. اگر برخی از اعداد رو طوری حذف کنی که میانگین بر اساس اون چیزی که شما می خوای بشه دیگه نمی تونی به اون اعداد تصادفی بگی. چون اعداد تصادفی خواصی دارند که باید مورد توجه قرار بگیره والا خیلی ضرر خواهید کرد.
http://baharuniversity.persiangig.com/simulation/Random%20Number%20Generation.pdf
http://fa.wikipedia.org/wiki/%D8%AA%D9%88%D9%84%DB%8C%D8%AF_%D8%A7%D8%B9%D8%AF% D8%A7%D8%AF_%D8%AA%D8%B5%D8%A7%D8%AF%D9%81%DB%8C
http://com-edu.persiangig.com/Cpro/C-3-5.html
http://ict.moe.org.ir/_ICT/Documents/%2813%29%20Random%20Numbers.pdf

پیشنهاد من استفاده از یک تابع توزیع خاص برای این کار است. تولید اعداد تصادفی با تابع توزیع مثلا نمایی این امکان را به شما می دهد که میانگین مورد نظر خود را بدست بیاورید. البته اگر از کران های شما خارج شد. نا گذیر باید اون عدد را حذف کنید. که برای این کار هم روش های خاصی وجود دارد که از عدم تصادفی بودن جلوگیری شود.

این مقاله تولید اعداد تصادفی با هر تابع توزیع را توزیع داده است.
http://gi.ics.nara-wu.ac.jp/~takasu/lecture/old/archives/L2_random_variables-2.pdf

برای یک تابع توزیع نمایی:

1- یک عدد تصادفی بین 1 و 0 تولید کرده و x بنامید
2- عدد تصادفی مورد نظر شما y است با توزیع نمایی که از رابطه زیر بدست می آید.
y=-1/landa*ln(x)

توجه نمایدد که landa میانگین مورد نظر شماست.

**maxim_saint** · 2012/05/24, 19:02

RE: درخواست ماکرو تولید کننده چند عدد تصادفی با میانگین مورد نظر

از توجهتون خیلی متشکرم...
بذار ساده بگم...
حد تصاب قبولی برای ما نمره 70 است، هر نفر چهار امتحان صد نمره ای میده که میانگین این چهار مرحله واسمون مهمه برای قبولی که باید هفتاد به بالا باشه. بعضی مواقع به ما اعلام میکنن که اینایی که معدلشون پایین 70 شده رو هم قبول کنین برن، ما هم باید برای اینکه قانونی بشه این موضوع، چهار نمره رو طوری تغییر بدیم که میانگینش به هفتاد برسه و عدد ها ی تغییر داده شده باید طوری باشن که مساوی هم مثلا همه 70 نباشن. در ضمن نمرات همه افراد هم با هم فرق داشته باشه یا حداقل نمرات هر 160 نفر نباید شبیه هم باشه...
حالا یه ماکرو میخوام که اینکارو بکنه...
نمیدونم تونستم منظورمو برسونم یا نه!!!!

**daghyad** · 2012/05/25, 00:09

RE: درخواست ماکرو تولید کننده چند عدد تصادفی با میانگین مورد نظر

تولید اعداد تصادفی باید بر اساس یک توزیع خاص باشه. اکسل برای تولید اعداد تصادفی data analyziz را داره که کافی اون را از توی add insفعال کنی و random number ganeratiion را انتخاب کنی و تعداد اعدا و نوع توزیع را انتخاب کنی. امیدارم بدردت بخوره

**Javid Mokhtari** · 2012/05/25, 00:31

RE: درخواست ماکرو تولید کننده چند عدد تصادفی با میانگین مورد نظر

با سلام.

Download Rnd

http://uplod.ir/gkrm20g18hzg/Rnd.xlsm.htm

دانلود فایل Rnd

**Javid Mokhtari** · 2012/05/25, 11:19

RE: درخواست ماکرو تولید کننده چند عدد تصادفی با میانگین مورد نظر

فکر کنم این روش بهتره:
http://uplod.ir/vv3uhfrhm0tv/Rnd_for_numbers.xlsm.htm

**daghyad** · 2012/05/26, 01:35

RE: درخواست ماکرو تولید کننده چند عدد تصادفی با میانگین مورد نظر

تابع Rnd یک عدد تصادفی بین صفر ویک ایجاد می کندترتیب تولید اعداد تصادفی همیشه در این تابع به یک منوال است و اگر دستور Rnd*10 را سه بار پشت سر هم اجرا کنیم همیشه سه عدد 7.055475 و5.33424 و5.795186 را برمی گرداند(منظور روند وترتیب تولید اعداد تصادفی هست) برای جلوگیری از این کار و تغییر ترتیب تولید اعداد تصادفی از تابع Randomize قبل از تابع Rnd استفاده می کنیم مثال:
dim i as integer
Randomize
i=Rnd()*10
به نقل از کتاب الکترونیکی توابع ویژوال بیسک بهروز راد صفحه 54

**Javid Mokhtari** · 2012/05/26, 02:28

RE: درخواست ماکرو تولید کننده چند عدد تصادفی با میانگین مورد نظر

نوشته اصلی توسط daghyad

تابع Rnd یک عدد تصادفی بین صفر ویک ایجاد می کندترتیب تولید اعداد تصادفی همیشه در این تابع به یک منوال است و اگر دستور Rnd*10 را سه بار پشت سر هم اجرا کنیم همیشه سه عدد 7.055475 و5.33424 و5.795186 را برمی گرداند برای جلوگیری از این کار و تغییر ترتیب تولید اعداد تصادفی از تابع Randomize قبل از تابع Rnd استفاده می کنیم مثال:
dim i as integer
Randomize
i=Rnd()*10

با سلام.
آیا مطمئن هستین که فقط این اعداد رو تولید می کنه...!؟
آخه من خیلی از این تابع استفاده کردم و این چنین که شما میگین،اعدادی که تولید می کنه محدود به این سه عدد نمیشه.

**maxim_saint** · 2012/05/26, 13:27

RE: درخواست ماکرو تولید کننده چند عدد تصادفی با میانگین مورد نظر

خیلی خیلی خیلی خیلی خیلی متشکر آقایjansiz hayat !!!!
ایشالله به آرزوهات برسی...
مشکلم حل شد.

**daghyad** · 2012/05/26, 22:37

RE: درخواست ماکرو تولید کننده چند عدد تصادفی با میانگین مورد نظر

نوشته اصلی توسط jansiz hayat

نوشته اصلی توسط daghyad

تابع Rnd یک عدد تصادفی بین صفر ویک ایجاد می کندترتیب تولید اعداد تصادفی همیشه در این تابع به یک منوال است و اگر دستور Rnd*10 را سه بار پشت سر هم اجرا کنیم همیشه سه عدد 7.055475 و5.33424 و5.795186 را برمی گرداند برای جلوگیری از این کار و تغییر ترتیب تولید اعداد تصادفی از تابع Randomize قبل از تابع Rnd استفاده می کنیم مثال:
dim i as integer
Randomize
i=Rnd()*10

با سلام.
آیا مطمئن هستین که فقط این اعداد رو تولید می کنه...!؟
آخه من خیلی از این تابع استفاده کردم و این چنین که شما میگین،اعدادی که تولید می کنه محدود به این سه عدد نمیشه.

سلام یه سری به این ادرس بزن:

Using Randomize() before Rnd() in VB.NET

http://stackoverflow.com/questions/1380990/using-randomize-before-rnd-in-vb-net

I have previously been told that I should always use Randomize() before I use Rnd() in a VB.NET application. Yet, it always seems to work fine without it. What does adding Randomize() do for me in ...

در کتاب الکتونیکی توابع ویژوال بیسک از بهروز راد هم به این مطلب اشاره شده

http://www.ebook.tarikhema.ir/tag/%D8%A8%D9%87%D8%B1%D9%88%D8%B2-%D8%B1%D8%A7%D8%AF/

**Javid Mokhtari** · 2012/05/26, 23:25

RE: درخواست ماکرو تولید کننده چند عدد تصادفی با میانگین مورد نظر

نوشته اصلی توسط daghyad

%B2-%D8%B1%D8%A7%D8%AF/[/url]

حالا منظورتون رو متوجه شدم.
آره همینطوره که شما میگین.اما این زمانیه که از تایع Rnd برای اولین بار بعد از باز شدن فایل استفاده می کنید.ولی برای چندین بار این چنین نیست.میتونید خودتون هم امتحان کنید.