RosettaCodeData/Task/Van-der-Corput-sequence/Mathematica/van-der-corput-sequence.math
Ingy döt Net 68f8f3e56b all tasks
2013-04-11 01:07:29 -07:00

3 lines
95 B
Text

VanDerCorput[n_,base_:2]:=Table[
FromDigits[{Reverse[IntegerDigits[k,base]],0},base],
{k,n}]