TA的每日心情 | 开心 2022-1-29 15:04 |
---|
签到天数: 1 天 [LV.1]初来乍到
|
是平面的等角对数螺旋么?cst丛书9里有例子,给你个函数算了,a是螺旋增长率,r是起始半径. K& j% x1 N( x
Dim xxx As Double, yyy As Double,ttt As Double,a As Double,r As Double
( W# ]; y* e/ z# V M5 V9 p. \/ D( Va=0.221" I$ D9 |, Y6 i6 V5 ]' f
r=2
7 X) O# e" f: v3 ^ For ttt = 0 To 4*pi STEP pi/32: N, w& e+ \& D/ F+ f$ _! n$ A3 b) X
xxx=r*exp(a*ttt)*cos(ttt)
P( ?5 D+ g3 D# z3 a- M' M9 q" B! C, { yyy = r*exp(a*ttt)*sin(ttt)
, d& J7 o2 l/ K, ?/ ? 3 r. M4 g% v: J' Q6 ?/ ^
.LineTo xxx , yyy
8 ?5 P9 D! Y8 T( x/ ?- _% u Next ttt |
|