Grapes/win 2.8 [Don't Edit] 3.14 ---------- BGstretchOn BGfile 1 ---------- UserFunction 1 1 1 asin(x/b)+c ---------- y = f(x) 1 1 1 f(x) (1<=x<=n) 0 16711680 3 0 1 ---------- 0 = f(x,y) 0 ---------- Point 22 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 2 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 P 7 0 2 Cells(k,1)+d Cells(k,2) 0 1 3n+2 k 1 0 0 255 255 16777215 1 0 0 1 1 0 0 1 0 6 0 Q 0 0 1 R 0 0 1 S 0 0 1 T 0 0 1 U 0 0 1 V 0 0 1 A 0 0 1 B 0 0 1 C 0 0 1 D 0 0 1 E 0 0 1 F 0 0 1 G 0 0 1 H 0 0 1 I 0 0 1 J 0 0 1 K 0 0 1 L 0 0 1 M 0 0 1 N 0 0 1 O 1 0 2 O 0 0 0 t 0.1 0 0 16777215 16711680 16777215 1 0 0 1 1 0 0 3 0 1 0 ---------- Segments 0 ---------- paramater 14 2.4857213 0 1 1 0.1 1 3 3.242857 0 1 1 0.1 1 4 0.75465185 0 1 1 0.1 1 5 0 0 1 1 0.5 1 6 0.48571408 0 1 1 0.5 1 0 16 0 1 1 1 1 2 1 0 1 1 0.1 1 0 1 0 1 1 0.1 1 0 1 0 1 1 0.1 1 0 1 0 1 1 0.1 1 0 16 0 1 1 0.1 1 0 0 0 1 1 0.1 1 0 6.2831817 0 1 1 0.1 1 0 1 0 1 1 1 0 1 1 1 80 ---------- KakuMode ScanWidth LogMode ThetaMode AreaMode capStyle 1 4 2 1 1 0 1 1 0 1 0 32 0 DrawMode SegmentShowSync 1 0 AfterImageColorNo, CanAImg,MaxAimgN0 2 1 3001 circleMode 1 ---------- ScaleX Vlow,VHigh,label 0 914 x x AxesVisible,ScaleVisible,Svaluevisible,AddDegreeLetter,ScaleGuidevisible 1 1 1 0 1 NUmber,Base,Linterval,numberR 9 1 1 9 High,Low 17.0021428762346 -0.574780200688495 ---------- ScaleY Vlow,VHigh,label 0 914 y AxesVisible,ScaleVisible,Svaluevisible,ScaleGuidevisible 1 1 1 1 0 NUmber,Base,Linterval,NumbeerR 9 1 1 9 High,Low 9.47784695773248 -7.91362695773248 ---------- ScaleS SquareQ AreaRectify PsMesh AxisWidth FontSize AxisOn letterCenterShowPOsition ShowEquation AxisType PolorNum Areafixed 0 1 0 1 12 0 2 0 0 0 12 0 0 0 ---------- Yvalue 1 1 ---------- Iinterval Svalue Evalue sliceNo 1 -1 1 1 40 10 Dfuncno Efuncno AreaQ 1 0 0 ---------- Yvalue Function List 6 y1 y2 y3 y4 y5 y6 ---------- Panel Position 657 35 503 67 301 577 0 187 1 0 1 0 1 1 1 0 1 ---------- PetaMEMO SECTION Style, Color, BGcolor , Size, PositionX, positionY 3 16711680 0 10 0 0 0 45 (1)乱数のヒストグラム (2)関数f(x)({1<=x<=n})をヒストグラム化 (3)(2)のパラメータを適当に自動変化させる (4){d=0}または{d=0.5} #//(1)ランダム・ヒストグラム #on n change #if n<=1 then n #if n>30 then n:=30 #ClrAllCells #Cells(1,1):=(0,0) #for u:=1 to n #Cells(3u-1):=(u-1,rnd(10)) #Cells(3u):=(u,Cells(3u-1,2)) #Cells(3u+1):=(u,0) #next u #Cells(3n+2):=(0,0) #draw #//(2)f(x)(1<=x<=n)をヒストグラム化 #on a,b,c change #for u:=1 to n #Cells(3u-1):=(u-1,f(u)) #Cells(3u):=(u,Cells(3u-1,2)) #next #draw #//(3)(2)をぐにゅっと動かす #m:=rnd(1) #for @:=0 to 2Pi step Pi/288 #a:=4sin(@/2)+2+m #b:=cos(@)+2+0.5m #c:=3sin((1+m)@)+m #call((2)f(x)(1<=x<=n)をヒストグラム化) #next #draw #//(4)平行移動SW #if d=0 then d:=1/2 else d:=0 #draw #//【f(X)の表示SW】 #InvShowObj(y1) ---------- 11 4 27 1 4 25 0 4 25 0 4 25 0 4 25 0 4 25 0 4 25 0 4 25 0 4 25 0 4 25 0 4 24 0 ---------- Table SECTION RowNo, ColumnNo 50 10 200 Table Data 1 data 0 0 2 data 0 1.50908311830786 3 data 1 1.50908311830786 4 data 1 0 5 data 1 2.1923406400417 6 data 2 2.1923406400417 7 data 2 0 8 data 2 2.73996526046881 9 data 3 2.73996526046881 10 data 3 0 11 data 3 3.10029356226728 12 data 4 3.10029356226728 13 data 4 0 14 data 4 3.23933183745849 15 data 5 3.23933183745849 16 data 5 0 17 data 5 3.14396308551512 18 data 6 3.14396308551512 19 data 6 0 20 data 6 2.82318448342179 21 data 7 2.82318448342179 22 data 7 0 23 data 7 2.30725858360895 24 data 8 2.30725858360895 25 data 8 0 26 data 8 1.64485831653837 27 data 9 1.64485831653837 28 data 9 0 29 data 9 0.89847514105848 30 data 10 0.89847514105848 31 data 10 0 32 data 10 0.138523541906612 33 data 11 0.138523541906612 34 data 11 0 35 data 11 -0.563301938438838 36 data 12 -0.563301938438838 37 data 12 0 38 data 12 -1.14079042974719 39 data 13 -1.14079042974719 40 data 13 0 41 data 13 -1.53946112927114 42 data 14 -1.53946112927114 43 data 14 0 44 data 14 -1.7217030714784 45 data 15 -1.7217030714784 46 data 15 0 47 data 15 -1.67032338161023 48 data 16 -1.67032338161023 49 data 16 0 50 data 0 0 60 60 60 60 60 60 60 60 60 60 ---------- SimpleMemo SECTION 0 ----------