A: {{0, -1}, {1, 0}}
r: {0.5, 1, 2}
angles: {0, (π * 1 / 3), (π * 2 / 3), (π * 3 / 3), (π * 4 / 3), (π * 5 / 3)}
rot = Sequence({{cos(angles(i)), sin(angles(i))}, {(-sin(angles(i))), cos(angles(i))}}, i, 1, Length[angles])
p1 = Sequence((rot(i) * (r(1), 0)), i, 1, Length[rot])
p2 = Sequence((rot(i) * (r(2), 0)), i, 1, Length[rot])
p3 = Sequence((rot(i) * (r(3), 0)), i, 1, Length[rot])
p = Join({p1, p2, p3})
vec = Sequence(Vector[p(i), p(i) + ((0.5 * A) * p(i))], i, 1, Length[p])
circles = Sequence(Circle[(0, 0), r(i)], i, 0, Length[r])