<< Chapter < Page Chapter >> Page >

trialmatch.m Estimates the probability of matches in n independent trials from identical distributions. The sample size and number of trials mustbe kept relateively small to avoid exceeding available memory.

% TRIALMATCH file trialmatch.m Estimates probability of matches % in n independent trials from identical distributions% Version of 8/20/97 % Estimates the probability of one or more matches% in a random selection from n identical distributions % with a small number of possible values% Produces a supersample of size N = n*ns, where % ns is the number of samples. Samples are separated.% Each sample is sorted, and then tested for differences % between adjacent elements. Matches are indicated by% zero differences between adjacent elements in sorted sample. X = input('Enter the VALUES in the distribution ');PX = input('Enter the PROBABILITIES '); c = length(X);n = input('Enter the SAMPLE SIZE n '); ns = input('Enter the number ns of sample runs ');N = n*ns; % Length of supersample U = rand(1,N); % Vector of N random numbersT = dquant(X,PX,U); % Supersample obtained with quantile function; % the function dquant determines quantile% function values for random number sequence U ex = sum(T)/N; % Sample averageEX = dot(X,PX); % Population mean vx = sum(T.^2)/N - ex^2; % Sample varianceVX = dot(X.^2,PX) - EX^2; % Population variance A = reshape(T,n,ns); % Chops supersample into ns samples of size nDS = diff(sort(A)); % Sorts each sample m = sum(DS==0)>0; % Differences between elements in each sample % -- Zero difference iff there is a matchpm = sum(m)/ns; % Fraction of samples with one or more matches d = arrep(c,n);p = PX(d); p = reshape(p,size(d)); % This step not needed in version 5.1ds = diff(sort(d))==0; mm = sum(ds)>0; m0 = find(1-mm);pm0 = p(:,m0); % Probabilities for arrangements with no matches P0 = sum(prod(pm0));disp('The sample is in column vector T') % Displays of results disp(['Sample average ex = ', num2str(ex),]) disp(['Population mean E(X) = ',num2str(EX),]) disp(['Sample variance vx = ',num2str(vx),]) disp(['Population variance V(X) = ',num2str(VX),]) disp(['Fraction of samples with one or more matches pm = ', num2str(pm),]) disp(['Probability of one or more matches in a sample Pm = ', num2str(1-P0),])
Got questions? Get instant answers now!


comb.m function y = comb(n,k) Calculates binomial coefficients. k may be a matrix of integers between 0 and n . The result y is a matrix of the same dimensions.

function y = comb(n,k) % COMB y = comb(n,k) Binomial coefficients% Version of 12/10/92 % Computes binomial coefficients C(n,k)% k may be a matrix of integers between 0 and n % result y is a matrix of the same dimensionsy = round(gamma(n+1)./(gamma(k + 1).*gamma(n + 1 - k)));
Got questions? Get instant answers now!

ibinom.m Binomial distribution — individual terms. We have two m-functions ibinom and cbinom for calculating individual and cumulative terms, P ( S n = k ) and P ( S n k ) , respectively.

P ( S n = k ) = C ( n , k ) p k ( 1 - p ) n - k and P ( S n k ) = r = k n P ( S n = r ) 0 k n
For these m-functions, we use a modification of a computation strategy employed by S. Weintraub: Tables of the Cumulative Binomial Probability Distribution for Small Values of p , 1963. The book contains a particularly helpful error analysis, written by Leo J. Cohen. Experimentation with sums and expectations indicates aprecision for ibinom and cbinom calculations that is better than 10 - 10 for n = 1000 and p from 0.01 to 0.99. A similar precision holds for values of n up to 5000, provided n p or n q are limited to approximately 500. Above this value for n p or n q , the computations break down. For individual terms, function y = ibinom(n,p,k) calculates the probabilities for n a positive integer, k a matrix of integers between 0 and n . The output is a matrix of the corresponding binomial probabilities.

function y = ibinom(n,p,k) % IBINOM y = ibinom(n,p,k) Individual binomial probabilities% Version of 10/5/93 % n is a positive integer; p is a probability% k a matrix of integers between 0 and n % y = P(X>=k) (a matrix of probabilities) if p>0.5 a = [1 ((1-p)/p)*ones(1,n)]; b = [1 n:-1:1]; c = [1 1:n]; br = (p^n)*cumprod(a.*b./c);bi = fliplr(br); elsea = [1 (p/(1-p))*ones(1,n)];b = [1 n:-1:1];c = [1 1:n];bi = ((1-p)^n)*cumprod(a.*b./c); endy = bi(k+1);
Got questions? Get instant answers now!

Questions & Answers

what is the stm
Brian Reply
is there industrial application of fullrenes. What is the method to prepare fullrene on large scale.?
industrial application...? mmm I think on the medical side as drug carrier, but you should go deeper on your research, I may be wrong
How we are making nano material?
what is a peer
What is meant by 'nano scale'?
What is STMs full form?
scanning tunneling microscope
how nano science is used for hydrophobicity
Do u think that Graphene and Fullrene fiber can be used to make Air Plane body structure the lightest and strongest. Rafiq
what is differents between GO and RGO?
what is simplest way to understand the applications of nano robots used to detect the cancer affected cell of human body.? How this robot is carried to required site of body cell.? what will be the carrier material and how can be detected that correct delivery of drug is done Rafiq
what is Nano technology ?
Bob Reply
write examples of Nano molecule?
The nanotechnology is as new science, to scale nanometric
nanotechnology is the study, desing, synthesis, manipulation and application of materials and functional systems through control of matter at nanoscale
Is there any normative that regulates the use of silver nanoparticles?
Damian Reply
what king of growth are you checking .?
What fields keep nano created devices from performing or assimulating ? Magnetic fields ? Are do they assimilate ?
Stoney Reply
why we need to study biomolecules, molecular biology in nanotechnology?
Adin Reply
yes I'm doing my masters in nanotechnology, we are being studying all these domains as well..
what school?
biomolecules are e building blocks of every organics and inorganic materials.
anyone know any internet site where one can find nanotechnology papers?
Damian Reply
sciencedirect big data base
Introduction about quantum dots in nanotechnology
Praveena Reply
what does nano mean?
Anassong Reply
nano basically means 10^(-9). nanometer is a unit to measure length.
do you think it's worthwhile in the long term to study the effects and possibilities of nanotechnology on viral treatment?
Damian Reply
absolutely yes
how to know photocatalytic properties of tio2 nanoparticles...what to do now
Akash Reply
it is a goid question and i want to know the answer as well
characteristics of micro business
for teaching engĺish at school how nano technology help us
How can I make nanorobot?
Do somebody tell me a best nano engineering book for beginners?
s. Reply
there is no specific books for beginners but there is book called principle of nanotechnology
how can I make nanorobot?
what is fullerene does it is used to make bukky balls
Devang Reply
are you nano engineer ?
fullerene is a bucky ball aka Carbon 60 molecule. It was name by the architect Fuller. He design the geodesic dome. it resembles a soccer ball.
what is the actual application of fullerenes nowadays?
That is a great question Damian. best way to answer that question is to Google it. there are hundreds of applications for buck minister fullerenes, from medical to aerospace. you can also find plenty of research papers that will give you great detail on the potential applications of fullerenes.
how did you get the value of 2000N.What calculations are needed to arrive at it
Smarajit Reply
Privacy Information Security Software Version 1.1a
A fair die is tossed 180 times. Find the probability P that the face 6 will appear between 29 and 32 times inclusive
Samson Reply

Get the best Algebra and trigonometry course in your pocket!

Source:  OpenStax, Applied probability. OpenStax CNX. Aug 31, 2009 Download for free at http://cnx.org/content/col10708/1.6
Google Play and the Google Play logo are trademarks of Google Inc.

Notification Switch

Would you like to follow the 'Applied probability' conversation and receive update notifications?