繰り返し用いる概念(Concept)なのでとりあえず定義しておきます。 # CVCM=等速円運動（Constant Velocity Circular Motion） # Radian=角度（60分割） CVCM<-function(Radian){ c0<-seq(0,...