创建一个for循环，在1-200之间打印x %% 3 = 0的每个数字

Question

就像标题所说我需要一个for循环，它会写出1到200之间的每个数字，均匀地除以3。

Answer 1

到目前为止发布的每个其他方法都会生成1：200的向量，然后扔掉它的三分之二。多么浪费。为了保持环保意识，这种方法不会浪费任何电子：

seq(3,200,by=3)

Answer 2

您不需要for循环，而是使用match函数，如：

which(1:200 %% 3 == 0)
 [1]   3   6   9  12  15  18  21  24  27  30  33  36  39  42  45  48  51  54  57  60  63  66  69  72  75  78  81
[28]  84  87  90  93  96  99 102 105 108 111 114 117 120 123 126 129 132 135 138 141 144 147 150 153 156 159 162
[55] 165 168 171 174 177 180 183 186 189 192 195 198

Answer 3

另外两种选择：

c(1:200)[c(F, F, T)]
c(1:200)[1:200 %% 3 == 0]