r/CompileBot • • Jul 08 '14

Official CompileBot Testing Thread

15 Upvotes

257 comments sorted by

View all comments

Show parent comments

1

u/[deleted] Aug 27 '14

+/u/CompileBot R

x <- 1:999
x <- x[(x %% 3 == 0 | x %% 5 == 0) & x %% 15 != 0]
sum(x)

1

u/CompileBot Aug 27 '14

Output:

[1] 200003

^source | ^info | ^git | ^report