Example

Generate 2000 random numbers by using the geometric distribution with parameters P=0.6.

Uses MtxExpr, StatRandom;
procedure Example;
var Res: Vector;
begin
  Res.Size(2000);
  RandomGeometric(0.6, Res, -1);
end;

#include "MtxExpr.hpp"
#include "StatRandom.hpp"
void __fastcall Example()
{
  sVector Res;
  Res.Size(2000,false);
  RandomGeometric(0.6, Res, -1);
}