RosettaCodeData/Task/Average-loop-length/J/average-loop-length-6.j

   sim=: (+/ % #)@,@((]?@$~1e4,]) ([: # (] ~.@, {:@] { [)^:_)"1 0/ i.)
   sim"0]1 2 3 4 5 6
1 1.5034 1.8825 2.22447 2.51298 2.76898