벡터 / 화살표가있는 원 그래프

Aug 20 2020

어떻게해야할지 모르겠다는 질문이 있습니다.

두 개의 원을 만드는 것은 문제가되지 않지만 2 단계로 진행하는 방법에 대해 고민하고 있습니다. 도움을받을 수 있습니까?

a) 원래 지점을 중심으로하는 두 개의 원, 하나는 반경 2 (빨간색), 다른 하나는 반경 3 (파란색)

b) 두 세트의 벡터, 하나는 원래 점에서 점 (2cos (x), 2sin (x))까지의 벡터로 구성됩니다. x는 π / 16 간격으로 0 ~ 2π 범위에 있고 다른 하나는 점 (3cos (x), 3sin (x)), 점 (2cos (x), 2sin (x))까지, x는 π / 16 간격으로 0에서 2π까지의 범위입니다. 참고 : 두 세트의 모든 벡터는 빨간색입니다. 결과는 다음 페이지의 그림과 같아야합니다.

필수.

답변

4 kglr Aug 20 2020 at 07:24
divs = Transpose @ Through @ {Cos, Sin} @ Subdivide[0, 2 Pi, 32];

{r1, r2} = {2, 3};

Graphics[{Thick, Blue, Circle[{0, 0}, r2], Red, Circle[{0, 0}, r1], 
  Thin, Arrowheads[{{-.05, r1/r2}, {.05, r1/r2}}], Arrow[{{0, 0}, r2 #}] & /@ divs}, 
 PlotRangePadding -> Scaled[.08], 
 ImagePadding -> 40, 
 AxesStyle -> Directive[14, Black, Arrowheads[.05]], 
 Axes -> True,
 AxesLabel -> (Style[#, 16] & /@ {"x", "y"}), 
 Background -> RGBColor[0.8354, 0.8, 0.6315], 
 ImageSize -> Large]