※現在、「wonderfl build flash online」求人コンテンツ制作に関してのアンケートを実施中です！みなさまのお力添えを頂いて、続々とアンケート結果が集まっていますが、まだまだ募集しております。ご協力のほど、どうぞよろしくお願いいたします！

wonderfl運営事務局
→アンケートページ（※ログインしてからお答えいただけるようになっています。）

 notice: Flash editor updated! Join the development! Thanks to MiniBuilder


forked from : makc3d's Lagrange polynomial [diff(1)]

embed

noswf download fullscreen
flash swf thumbnail

FORKED
>sort

forked from: Lagrange polynomial forked from: forked from: Lagrange polynomial [diff(1)]

  1. // forked from hacker_012ke7zh's forked from: Lagrange polynomial
  2. // forked from makc3d's Lagrange polynomial
  3. // http://en.wikipedia.org/wiki/Lagrange_polynomial
  4. package {
  5.     import flash.display.Sprite;
  7.     [SWF(frameRate="7")] 
  8.     public class FlashTest extends Sprite {
  9.         public function FlashTest() {
  10.             Wonderfl.capture_delay (10);
  11.             stage.addEventListener ("mouseDown", onMouseDown);
  12.             stage.addEventListener ("mouseUp", onMouseUp);
  13.             stage.addEventListener ("enterFrame", onEnterFrame);
  14.         }
  16.         public var mouseDown:Boolean = false;
  17.         public function onMouseDown (e:*):void {
  18.             posx.length = 0;
  19.             posy.length = 0;
  20.             mouseDown = true;
  21.         }
  22.         public function onMouseUp (e:*):void {
  23.             mouseDown = false;
  24.         }
  26.         public var posx:Array = [];
  27.         public var posy:Array = [];
  28.         public function onEnterFrame (e:*):void {
  29.             if (mouseDown) {
  30.                 posx.push (mouseX);
  31.                 posy.push (mouseY);
  32.             }
  34.             var i:int = 0, ts:Array = [];
  35.             graphics.clear ();
  36.             graphics.lineStyle ();
  37.             graphics.beginFill (0xFF0000);
  38.             for (i = 0; i < posx.length; i++) {
  39.                 ts.push (i);
  40.                 graphics.drawCircle (posx [i], posy [i], 3);
  41.             }
  43.             graphics.endFill ();
  44.             if (!mouseDown && (posx.length > 1)) {
  45.                 graphics.lineStyle (0, 0);
  46.                 for (var t:Number = 0; t < 100; t += 0.1) {
  47.                     var tx:Number = lagrangeInterpolatingPolynomial (
  48.                         ts, posx, t);
  49.                     var ty:Number = lagrangeInterpolatingPolynomial (
  50.                         ts, posy, t);
  51.                     if (t == 0)
  52.                         graphics.moveTo (tx, ty);
  53.                     else
  54.                         graphics.lineTo (tx, ty);
  55.                 }
  56.             }
  57.         }
  59.         public function lagrangeInterpolatingPolynomial (
  60.             pos:Array, val:Array, desiredPos:Number):Number {
  61.             var degree:int = pos.length;
  62.             var retVal:Number = 0; 
  64.             for (var i:int = 0; i < degree; i++) {
  65.                 var weight:Number = 1; 
  67.                 for (var j:int = 0; j < degree; j++) {
  68.                     // The i-th term has to be skipped
  69.                     if (j != i) {
  70.                         weight *= (desiredPos - pos[j]) / (pos[i] - pos[j]);
  71.                     }
  72.                 }
  74.                 retVal += weight * val[i];
  75.             }
  76.  
  77.             return retVal; 
  78.         }
  79.     }
  80. }
noswf
Get Adobe Flash Player