Project Euler Problem 1

If we list all the natural numbers below 10 that are multiples of 3 or 5, we get 3, 5, 6 and 9. The sum of these multiples is 23.

Find the sum of all the multiples of 3 or 5 below 1000.

一日一論文も三日坊主で続かない毎日ですが,思いつきでProject Euler(プロジェクト・オイラー)をRで解けるとこまでやってみよう.

 a <- 1:999
 sum(a[(!a%%3)|(!a%%5)])
233168

オレは一般化するなんてかっこいいことはしないぜ.