TA的每日心情 | 开心 2022-1-29 15:04 |
---|
签到天数: 1 天 [LV.1]初来乍到
|
是平面的等角对数螺旋么?cst丛书9里有例子,给你个函数算了,a是螺旋增长率,r是起始半径
( x$ k- c9 |5 F9 @Dim xxx As Double, yyy As Double,ttt As Double,a As Double,r As Double
/ m/ `. j ?% c3 K3 }: ]a=0.221& ?/ b6 k: I. X1 x0 x: l
r=2
" J# `; d- w& ]2 A For ttt = 0 To 4*pi STEP pi/32
# e( H8 `% a! L% H* X1 x7 N U# A xxx=r*exp(a*ttt)*cos(ttt)
7 e$ S( j' Z4 q- x7 O7 |2 `) R yyy = r*exp(a*ttt)*sin(ttt)
2 t1 k# L& ?# r4 @: {/ w
* @/ ` X* b4 k0 K' }4 g1 r9 I# b/ O .LineTo xxx , yyy
1 I) }) y' Q! |0 w$ a Q; S o, @ Next ttt |
|