netlogo-海龟的径向

netlogo-海龟的径向,netlogo,shape,heading,Netlogo,Shape,Heading,我有一个椭圆形。(创建时具有垂直方向) 我想在圆形轮廓上放置几个这样的形状 它们之间的距离应相同 ;x,y - circle center coordinates ;r - radius to draw-ellipses [x y r elNum ] if elNum > 0 [ let theta 0 let delta 360 / elNum loop[ if elNum = 0 [ stop ] crt 1 [

我有一个椭圆形。(创建时具有垂直方向) 我想在圆形轮廓上放置几个这样的形状 它们之间的距离应相同

;x,y - circle center coordinates
;r - radius
to draw-ellipses [x y r elNum ]
  if  elNum > 0 [
    let theta 0
    let delta 360 / elNum
    loop[
      if  elNum = 0 [ stop ]
      crt 1 [
        setxy (x + r * cos theta) (y + r * sin theta)
        set shape "ellipse"
        set heading 90 + theta
        set size 7
      ]
      set theta  (theta + delta)
      set elNum (elNum - 1)
    ]
  ]
end
椭圆形状放置正确,但方向错误。我希望椭圆有径向。即是半径到放置形状的点的连续线。但方向并不好。 仅在0度和180度时,方向正常


一些建议我遗漏了什么?

我是否正确理解您希望您的海龟背向半径?如果是这样,请尝试将标题行替换为:

set heading atan xcor ycor
以符合你的角度数学的方式来做。或者,您可以使用
facexy
,将标题行替换为以下内容:

facexy x y
rt 180

我是否正确理解您希望您的海龟背对半径?如果是这样,请尝试将标题行替换为:

set heading atan xcor ycor
以符合你的角度数学的方式来做。或者,您可以使用
facexy
,将标题行替换为以下内容:

facexy x y
rt 180