Do[式, {i, min_i, max_i, step_i}]
→ step_i おきに i を min_i から max_i まで変えながら式を繰り返す.

てなこっちゃけど、結果を対数表示させたいので、min_i*step_i^n
ってループさせる方法は?