(print (mapv #(if(= 1 %)1(numerator(nth(distinct(for[i(range)j(range 1(inc i))](/ j i)))(dec %)))) (range 1 51)))
Standard input is empty
[1 1 1 2 1 3 1 2 3 4 1 5 1 2 3 4 5 6 1 3 5 7 1 2 4 5 7 8 1 3 7 9 1 2 3 4 5 6 7 8 9 10 1 5 7 11 1 2 3 4]
The brand new service which powers Ideone!
Widget for compiling and running the source code in a web browser!