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


embed

noswf download fullscreen
flash swf thumbnail play
download fullscreen
FORKED
>sort

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

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