[erlang-questions] generating primes

[Ben Fuhrmannek]

Another approach to prime number generation:
http://en.wikipedia.org/wiki/Prime_number_formulas#Other_formulas

prime(N, Nfac1) ->
	Nfac = Nfac1 * N,
	Prime = 2 + ((2 * Nfac) rem (N+1)),
	case Prime of
		2 -> omit;
		_ ->
			io:format("~p~n", [Prime])
	end,
	prime(N+1, Nfac).

start: prime(1,1).