TA的每日心情 | 开心 2022-1-29 15:04 |
---|
签到天数: 1 天 [LV.1]初来乍到
|
是平面的等角对数螺旋么?cst丛书9里有例子,给你个函数算了,a是螺旋增长率,r是起始半径 S4 Y* J* E* t9 i9 C* `
Dim xxx As Double, yyy As Double,ttt As Double,a As Double,r As Double* Q) p- {* G& [' _
a=0.221
% }3 P# M U6 e' er=2
) s4 p4 N! Y: L7 Q( S' c& _ For ttt = 0 To 4*pi STEP pi/32
. ~$ ~1 @1 T$ h o+ \ xxx=r*exp(a*ttt)*cos(ttt)
8 N' \+ T# e9 V4 P& C/ W yyy = r*exp(a*ttt)*sin(ttt)( j$ B, Z* U8 w# c5 k, F
1 q4 k u' D3 A3 V$ p9 h
.LineTo xxx , yyy
' U: b6 F, r$ k* N Next ttt |
|