任意曲线构造技巧-描点+多边形法
20260722
#Len=滑动条(0, 10,0.01)
n=滑动条(0, 10,1)
r = 滑动条(0, 10,0.01)
#R = 滑动条(0, 10,0.01)
m=滑动条(0, 10,1)
#Al=滑动条(0, 20,0.1)
#Ak=滑动条(0, 20,0.1)
#Ratio = 滑动条(-0.2, 1.5,0.01)
PList1={B,C,D,E,F}
SP1=折线(PList1)
SP2=圆弧(A,A+(r,0),A+(r;3pi/3))
t = 滑动条(0, 10,0.01)
a=t SP1+(1-t) SP2
k=滑动条(0, 20,1)
#Plist1=平移(旋转(位似(合并({序列((1;i pi/2/k-pi/4)+ (-cos(π / 4), 0),i,0,k),序列((1;i pi/2/k+3pi/4)+ (cos(π / 4), 0),i,0,k)}),1/sin(pi/4)/2,(0,0)),pi/2,(0,0)),向量( (0.5,0)))
P1=序列((描点(SP1,i/k)),i,0,k)
P2=序列((描点(SP2,i/k)),i,0,k)
P3=序列((描点({SP1,SP2},i/k)),i,0,k+1)
SP9=多边形(P3)
SP3=多边形(合并(P1,P2))
f1=x^2-1
f2=x^3-1
f3=-2+1/(x-3)
f4=sin(2x-1)
Fun={f1,f2,f3,f4}
Pic= 滑动条(1, 4,1)
f=Fun(Pic)
PF=序列((i,f(i)),i,-1,1,0.02)
SPF=多边形(合并(P2,PF))
Plist1=序列(序列(平移(旋转(位似(SPF,1,(0,0)),区间随机数(0,3) pi/2,(0,0)),向量( (i,j))),i,0,2n,2),j,0,2m,2)
#p1=多边形(Plist1)
#p2=旋转(p1,pi/2,(0,0)))
#Base={p1,p2}
#均匀分布随机数
#M=序列(序列(均匀分布随机数(0,1),i,1,n),j,1,m)
#M=序列(序列(区间随机数(0,1),i,1,n),j,1,m)