具有可变数量参量的积分函数

using System;

using MathWorks.MATLAB.NET.Utility;
using MathWorks.MATLAB.NET.Arrays;

using VarArgComp;


namespace MathWorks.Examples.VarArgApp
 {
  /// <summary>
  /// This application demonstrates how to call components 
  ///  having methods with varargin/vargout arguments.
  /// </summary>
  class VarArgApp
    {
      #region MAIN

      /// <summary>
      /// The main entry point for the application.
      /// </summary>
      [STAThread]
      static void Main(string[] args)
        {
          // Initialize the input data
          MWNumericArray colorSpec= new double[]
                                        {0.9, 0.0, 0.0};
          MWNumericArray data= 
                  new MWNumericArray(new int[,]{{1,2},{2,4},
                                       {3,6},{4,8},{5,10}});  
          MWArray[] coords= null;

          try
            {
              // Create a new plotter object
              Plotter plotter= new Plotter();

              //Extract a variable number of two element x and y coordinate 
              //  vectors from the data array
              coords= plotter.extractcoords(5, data);

              // Draw a graph using the specified color to connect the 
              //   variable number of input coordinates.
              // Return a two column data array containing the input coordinates.
              data= (MWNumericArray)plotter.drawgraph(colorSpec, 
                coords[0], coords[1], coords[2],coords[3], coords[4]);

              Console.WriteLine("result=\n{0}", data);

              Console.ReadLine();  // Wait for user to exit application

              // Note: You can also pass in the coordinate array directly.
              data= (MWNumericArray)plotter.drawgraph(colorSpec, coords);

              Console.WriteLine("result=\n{0}", data); 
 
              Console.ReadLine();  // Wait for user to exit application
            }

          catch(Exception exception)
            {
              Console.WriteLine("Error: {0}", exception);
            }
        }

      #endregion
    }
  }

Imports System

Imports MathWorks.MATLAB.NET.Utility
Imports MathWorks.MATLAB.NET.Arrays

Imports VarArgComp


Namespace MathWorks.Demo.VarArgDemoApp


' <summary>
' This application demonstrates how to call components having methods with 
'   varargin/vargout arguments.
' </summary>
Class VarArgDemoApp
    
#Region " MAIN "

        ' <summary>
        ' The main entry point for the application.
        ' </summary>
        Shared Sub Main(ByVal args() As String)

            ' Initialize the input data
            Dim colorSpec As MWNumericArray = 
              New MWNumericArray(New Double() {0.9, 0.0, 0.0})
            Dim data As MWNumericArray = 
              New MWNumericArray(New Integer(,) {{1, 2}, {2, 4}, {3, 6}, {4, 8}, {5, 10}})
            Dim coords() As MWArray = Nothing

            Try

                ' Create a new plotter object
                Dim plotter As Plotter = New Plotter

                'Extract a variable number of two element x and y coordinate 
                ' vectors from the data array
                coords = plotter.extractcoords(5, data)

                ' Draw a graph using the specified color to connect the variable number of 
                '  input coordinates.
                ' Return a two column data array containing the input coordinates.
                data = CType(plotter.drawgraph(colorSpec, coords(0), coords(1), coords(2), 
                   coords(3), coords(4)), _
                             MWNumericArray)

                Console.WriteLine("result={0}{1}", Chr(10), data)

                Console.ReadLine()  ' Wait for user to exit application

                ' Note: You can also pass in the coordinate array directly.
                data = CType(plotter.drawgraph(colorSpec, coords), MWNumericArray)

                Console.WriteLine("result=\{0}{1}", Chr(10), data)

                Console.ReadLine()  ' Wait for user to exit application


            Catch exception As Exception
                Console.WriteLine("Error: {0}", exception)
            End Try
        End Sub
#End Region

    End Class
End Namespace