1. Bu site çerezler kullanır. Bu siteyi kullanmaya devam ederek çerez kullanımımızı kabul etmiş olursunuz. Daha Fazla Bilgi.

C ile Gama(alfa,beta) dağılımından sayı üretme ve betimsel istatistikler

'Bilgisayar Programlama ve Kodlama' forumunda Powers tarafından 1 Şubat 2013 tarihinde açılan konu

  1. Powers

    Powers Administrator Site Yetkilisi

    /* Gama(alfa,beta) dan sayi uretme ve betimsel istatistikler */
    # include <stdio.h>
    # include <math.h>
    # include <time.h>
    # include <stdlib.h>
    /* sayi uretme */
    float gama(int alfa,float beta)
    {
    float uret=0.0;
    float z;
    int i;
    for(i=0;i<=alfa;i++)
    z=-beta*log(rand()*1.0/32767.0);
    uret=uret+z;
    return(uret);
    }
    /* ortalama bulma */
    float ortbul(dizi,boyut)
    float dizi[];
    int boyut;
    {
    double top=0.0;
    int i;
    for (i=0;i<boyut;i++)
    {
    top=top+dizi;
    }
    top=top/boyut;
    return(top);
    }
    /* en kucuk bulma */
    float minbul(dizi,boyut)
    float dizi[];
    int boyut;
    {
    double min;
    int i;
    min=dizi[0];
    for (i=0;i<boyut;i++)
    {
    if (dizi<min)
    min=dizi;
    }
    return(min);
    }
    /* en buyuk bulma */
    float maxbul(dizi,boyut)
    float dizi[];
    int boyut;
    {
    double max;
    int i;
    max=dizi[0];
    for (i=0;i<boyut;i++)
    {
    if (dizi>max)
    max=dizi;
    }
    return(max);
    }
    /* varyans bulma */
    float varbul(dizi,boyut,orta)
    float dizi[], orta;
    int boyut;
    {
    double top;
    int i;
    top=0.0;
    for (i=0;i<boyut;i++)
    {
    top=top+(dizi-orta)*(dizi-orta);
    }
    top=top/(boyut-1);
    return(top);
    }
    /* ana program */
    main()
    {
    int n,alfa1, i, sayi;
    float dizi[15000];
    float beta1,min1,max1;
    double ort, ovar, ssapma;
    clrscr();
    randomize();
    printf("Gama(alfa,beta) dan sayi uretme ve betimsel istatistikler \n\n");
    printf("alfa=");scanf("%d",&alfa1);
    printf("beta=");scanf("%f",&beta1);
    printf("kacç adet sayi uretilecek (<15000 olmali)=");scanf("%d",&n);
    if ( n>15000)
    {
    printf("girdiginiz sayi 15000 den buyuk\n");
    printf("program sonlandirildi\n");
    getch();
    exit(1);
    }
    printf("alfa=%d beta=%f boyut=%d",alfa1,beta1,n);
    getch();
    printf("\n");
    for (i=0;i<n;i++)
    {
    dizi=gama(alfa1,beta1);
    }
    for (i=0;i<n;i++)
    {
    printf("%d .eleman %5f \n", i,dizi);
    }
    getch();
    min1=minbul(dizi,n);
    max1=maxbul(dizi,n);
    ort=ortbul(dizi,n);
    ovar=varbul(dizi,n,ort);
    printf("en kucuk =%f\n",min1);
    printf("en buyuk =%f\n",max1);
    printf("ortalama =%f\n",ort);
    printf("orneklem varyansi =%f\n",ovar);
    getch();
    }
     
    Tags:

Bu Sayfayı Paylaş

  1. Bu site çerezler kullanır. Bu siteyi kullanmaya devam ederek çerez kullanımımızı kabul etmiş olursunuz. Daha Fazla Bilgi.
  1. Bu site çerezler kullanır. Bu siteyi kullanmaya devam ederek çerez kullanımımızı kabul etmiş olursunuz. Daha Fazla Bilgi.
Yükleniyor...