From db6a6ecfa350cae29739c59df1210d8f76a479c9 Mon Sep 17 00:00:00 2001
From: Patrick Simianer <p@simianer.de>
Date: Thu, 5 Dec 2013 07:56:38 +0100
Subject: init

---
 sample_n | 23 +++++++++++++++++++++++
 1 file changed, 23 insertions(+)
 create mode 100755 sample_n

(limited to 'sample_n')

diff --git a/sample_n b/sample_n
new file mode 100755
index 0000000..2115407
--- /dev/null
+++ b/sample_n
@@ -0,0 +1,23 @@
+#!/usr/bin/env ruby
+
+require 'trollop'
+
+
+def usage
+  STDERR.write "./sample --size <n> --population <n>\n"
+  exit 1
+end
+usage if ARGV.size!=4
+
+opts = Trollop::options do
+  opt :size, "Sample size (percentage).", :type => :int
+  opt :population, "'Population' (number \in N)", :type => :int
+end
+
+
+prng = Random.new(Random.new_seed)
+
+1.upto(opts[:population]) { |i|
+  puts i if prng.rand(1..opts[:size])==0
+}
+
-- 
cgit v1.2.3