- 1、本文档共13页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
PAGE \* MERGEFORMAT3
1.//生成高斯分布随机数
#includestdio.h
#includestdlib.h
#includemath.h
#define PI 3.141592654
double gaussrand()
{
static double U1,U2;
static int phase=0;
double Z,X;
double m=0,sd=1;
//m为均值,sd是方差
if(phase==0)
{
U1=rand()/(RAND_MAX+1.0);
U2=rand()/(RAND_MAX+1.0);
Z=sqrt(-2.0*log(U1))*sin(2.0*PI*U2);
}
else
{
Z=sqrt(-2.0*log(U1))*cos(2.0*PI*U2);
}
phase=1-phase;
X = m+(Z*sd);
return X;
}
int main()
{
int i=0;
for(i=0;i1000;i++)
{
printf(%f\n,gaussrand());
}
}
2.//生成瑞利分布随机数
#includestdio.h
#includestdlib.h
#includemath.h
double Rayleigh()
{
static double U1;
double sigma,R;
U1=rand()/(RAND_MAX+1.0);
sigma = 1;
R = sigma*sqrt(-2*log(U1));
//瑞利分布的公式
return R;
}
int main()
{
int i=0;
for(i=0;i1000;i++)
{
printf(%f\t,Rayleigh());
}
}
3.泊松分布:
#includestdio.h
#includestdlib.h
#includectime
#includemath.h
//Generate the random numbers
long Possion(double u)
{
double P,U;
long N;
u=exp(-u);
P=1;N=0;
while(1)
{
U=(double)rand()/RAND_MAX;
P=P*U;
if(P=u) break;
N++;
}
return N;
}
// Generate 10000 distributed random output numbers which are put into a text called”312”
void main()
{
int k;
double lamda;
scanf(%lf,lamda);
FILE *fp1;
fp1=fopen(p1.txt,w);
srand((unsigned)time(0));
for(k=1;k10000;k++)
{
fprintf(fp1,%6ld ,Possion(lamda));
}
fclose(fp1);
}
3.//莱斯分布随机变量
#define _CRT_SECURE_NO_WARNINGS
#include stdio.h
#include stdlib.h
#include math.h
#define PI 3.141592654
double Gaussrand(double m, double sd)
{
double U1, U2;
double r1, r2,z,r;
U1 = rand() / (RAND_MAX + 1.0);
U2 = rand() / (RAND_MAX + 1.0);
r1 = sqrt(-2 * log(U1))*cos(U2 * PI*2);
r2 = sqrt(-2 * log(U1))*sin(U2 * PI*2);
z = m+r1*sd;
return z;
}
int main()
{
double Ricianrand;
for (int i = 0; i 10000; i++)
{
double y1 = Gaussrand(0
您可能关注的文档
- 美术大课堂试听课程.pptx
- 美术社团计划复习总结.doc
- 门窗校核操作实例.doc
- 绵阳市高中第三次诊断性考试文数.doc
- 免疫球蛋白在儿科的应用和认识.ppt
- 渑池二中优秀学生交流会召开.docx
- 缅怀先烈继承传统主题教育.ppt
- 面试挂网附件.doc
- 面向成功的职业规划设计.ppt
- 面向对象程序设计资料整理(长大).doc
- 2-红河州建筑施工安全生产标准化工地复核评分表(2022年修改版).docx
- 6.锡通项目2018年下半年工作会汇报材料(2018.7.9).docx
- 2018道路工程知识点汇总(新版).docx
- 附件3:月度生产例会安全汇报资料-站台门项目部.docx
- 附件2:广东建工集团2018年度科技成果汇总表.DOC
- 马武停车区、三汇停车区停车位管理系统,0#台账缺量.doc
- 攀成钢委办发〔2015〕19号(党风廉政建设责任考核与追究办法).doc
- 1-红河州建筑工程质量管理标准化复核评分表(2022年修改版).docx
- 中交第三公路工程局第四工程分公司项目经济合同结算管理办法(修订).doc
- 厂站安全操作规程汇编.doc
最近下载
- 高中-英语-北师大版(2019)-Unit3Viewingworkshop同步教学设计【新教材】北师大版(2019)必修第一册.docx VIP
- 2023-2024学年八年级语文下学期期末复习题型专练非连续性文本阅读(原卷版+解析版).docx VIP
- 2024年海南省海口市龙华区海南华侨中学自主招生地理试题.docx VIP
- (三模)豫西北教研联盟 (平许洛济)2024—2025学年高三第三次质量检测化学试卷(含答案).pdf
- 中考数学压轴题100题(全).docx
- 石油钻井工初级.pdf
- 基于AT89S52单片机的脉搏测量器设计.doc VIP
- 微分中值定理在实际生活中的应用.doc
- 2023年版:重症患者气道廓清技术专家共识.docx
- 《马克思主义基本原理概论》对立统一规律.ppt
文档评论(0)