Построение круга с векторами / стрелками
У меня вопрос, который я не знаю, как это сделать.
Создание двух кругов - не проблема, но я застрял в том, как перейти к шагу 2. Могу я получить помощь, пожалуйста?
а) Два круга с центром в исходной точке, один с радиусом 2, красного цвета, а другой с радиусом 3, синего цвета.
б) Два набора векторов, один состоит из векторов от исходной точки до точки (2cos (x), 2sin (x)), когда x изменяется от 0 до 2π с интервалами π / 16, а другой состоит из векторов из от точки (3cos (x), 3sin (x)) до точки (2cos (x), 2sin (x)), так как x изменяется от 0 до 2π с интервалами π / 16. Примечание. Все векторы двух наборов отмечены красным цветом. Результат должен быть таким же, как на рисунке на следующей странице.

Ответы
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]
