Surface Chart (3)

[ASP.NET - VB Version] NetWebCharts\VBNetASP\surface3.aspx
(Click here on how to convert this code to Visual Studio code-behind style.)

<%@ Page Language="VB" Debug="true" %>
<%@ Import Namespace="ChartDirector" %>
<%@ Register TagPrefix="chart" Namespace="ChartDirector" Assembly="netchartdir" %>
<script runat="server">

'
' Page Load event handler
'
Protected Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs)

    ' The x and y coordinates of the grid
    Dim dataX() As Double = {-10, -9, -8, -7, -6, -5, -4, -3, -2, -1, 0, 1, 2, 3, _
        4, 5, 6, 7, 8, 9, 10}
    Dim dataY() As Double = {-10, -9, -8, -7, -6, -5, -4, -3, -2, -1, 0, 1, 2, 3, _
        4, 5, 6, 7, 8, 9, 10}

    ' The values at the grid points. In this example, we will compute the values
    ' using the formula z = Sin(x * x / 128 - y * y / 256 + 3) * Cos(x / 4 + 1 -
    ' Exp(y / 8))
    Dim dataZ((UBound(dataX) + 1) * (UBound(dataY) + 1) - 1) As Double
    For yIndex As Integer = 0 To UBound(dataY)
        Dim y As Double = dataY(yIndex)
        For xIndex As Integer = 0 To UBound(dataX)
            Dim x As Double = dataX(xIndex)
            dataZ(yIndex * (UBound(dataX) + 1) + xIndex) = Math.Sin(x * x / 128.0 - _
                y * y / 256.0 + 3) * Math.Cos(x / 4.0 + 1 - Math.Exp(y / 8.0))
        Next
    Next

    ' Create a SurfaceChart object of size 750 x 600 pixels
    Dim c As SurfaceChart = New SurfaceChart(750, 600)

    ' Add a title to the chart using 20 points Times New Roman Italic font
    c.addTitle("Surface Energy Density       ", "Times New Roman Italic", 20)

    ' Set the center of the plot region at (380, 260), and set width x depth x height
    ' to 360 x 360 x 270 pixels
    c.setPlotRegion(380, 260, 360, 360, 270)

    ' Set the elevation and rotation angles to 30 and 210 degrees
    c.setViewAngle(30, 210)

    ' Set the perspective level to 60
    c.setPerspective(60)

    ' Set the data to use to plot the chart
    c.setData(dataX, dataY, dataZ)

    ' Spline interpolate data to a 80 x 80 grid for a smooth surface
    c.setInterpolation(80, 80)

    ' Use semi-transparent black (c0000000) for x and y major surface grid lines. Use
    ' dotted style for x and y minor surface grid lines.
    Dim majorGridColor As Integer = &Hc0000000
    Dim minorGridColor As Integer = c.dashLineColor(majorGridColor, Chart.DotLine)
    c.setSurfaceAxisGrid(majorGridColor, majorGridColor, minorGridColor, _
        minorGridColor)

    ' Set contour lines to semi-transparent white (80ffffff)
    c.setContourColor(&H80ffffff)

    ' Add a color axis (the legend) in which the left center is anchored at (665,
    ' 280). Set the length to 200 pixels and the labels on the right side.
    c.setColorAxis(665, 280, Chart.Left, 200, Chart.Right)

    ' Set the x, y and z axis titles using 12 points Arial Bold font
    c.xAxis().setTitle("X Title<*br*>Placeholder", "Arial Bold", 12)
    c.yAxis().setTitle("Y Title<*br*>Placeholder", "Arial Bold", 12)
    c.zAxis().setTitle("Z Title Placeholder", "Arial Bold", 12)

    ' Output the chart
    WebChartViewer1.Image = c.makeWebImage(Chart.JPG)

End Sub

</script>
<html>
<body>
    <chart:WebChartViewer id="WebChartViewer1" runat="server" />
</body>
</html>

[ASP.NET - C# Version] NetWebCharts\CSharpASP\surface3.aspx
(Click here on how to convert this code to Visual Studio code-behind style.)

<%@ Page Language="C#" Debug="true" %>
<%@ Import Namespace="ChartDirector" %>
<%@ Register TagPrefix="chart" Namespace="ChartDirector" Assembly="netchartdir" %>
<script runat="server">

//
// Page Load event handler
//
protected void Page_Load(object sender, EventArgs e)
{
    // The x and y coordinates of the grid
    double[] dataX = {-10, -9, -8, -7, -6, -5, -4, -3, -2, -1, 0, 1, 2, 3, 4, 5, 6,
        7, 8, 9, 10};
    double[] dataY = {-10, -9, -8, -7, -6, -5, -4, -3, -2, -1, 0, 1, 2, 3, 4, 5, 6,
        7, 8, 9, 10};

    // The values at the grid points. In this example, we will compute the values
    // using the formula z = Sin(x * x / 128 - y * y / 256 + 3) * Cos(x / 4 + 1 -
    // Exp(y / 8))
    double[] dataZ = new double[(dataX.Length) * (dataY.Length)];
    for(int yIndex = 0; yIndex < dataY.Length; ++yIndex) {
        double y = dataY[yIndex];
        for(int xIndex = 0; xIndex < dataX.Length; ++xIndex) {
            double x = dataX[xIndex];
            dataZ[yIndex * (dataX.Length) + xIndex] = Math.Sin(x * x / 128.0 - y * y
                 / 256.0 + 3) * Math.Cos(x / 4.0 + 1 - Math.Exp(y / 8.0));
        }
    }

    // Create a SurfaceChart object of size 750 x 600 pixels
    SurfaceChart c = new SurfaceChart(750, 600);

    // Add a title to the chart using 20 points Times New Roman Italic font
    c.addTitle("Surface Energy Density       ", "Times New Roman Italic", 20);

    // Set the center of the plot region at (380, 260), and set width x depth x
    // height to 360 x 360 x 270 pixels
    c.setPlotRegion(380, 260, 360, 360, 270);

    // Set the elevation and rotation angles to 30 and 210 degrees
    c.setViewAngle(30, 210);

    // Set the perspective level to 60
    c.setPerspective(60);

    // Set the data to use to plot the chart
    c.setData(dataX, dataY, dataZ);

    // Spline interpolate data to a 80 x 80 grid for a smooth surface
    c.setInterpolation(80, 80);

    // Use semi-transparent black (c0000000) for x and y major surface grid lines.
    // Use dotted style for x and y minor surface grid lines.
    int majorGridColor = unchecked((int)0xc0000000);
    int minorGridColor = c.dashLineColor(majorGridColor, Chart.DotLine);
    c.setSurfaceAxisGrid(majorGridColor, majorGridColor, minorGridColor,
        minorGridColor);

    // Set contour lines to semi-transparent white (80ffffff)
    c.setContourColor(unchecked((int)0x80ffffff));

    // Add a color axis (the legend) in which the left center is anchored at (665,
    // 280). Set the length to 200 pixels and the labels on the right side.
    c.setColorAxis(665, 280, Chart.Left, 200, Chart.Right);

    // Set the x, y and z axis titles using 12 points Arial Bold font
    c.xAxis().setTitle("X Title\nPlaceholder", "Arial Bold", 12);
    c.yAxis().setTitle("Y Title\nPlaceholder", "Arial Bold", 12);
    c.zAxis().setTitle("Z Title Placeholder", "Arial Bold", 12);

    // Output the chart
    WebChartViewer1.Image = c.makeWebImage(Chart.JPG);
}

</script>
<html>
<body>
    <chart:WebChartViewer id="WebChartViewer1" runat="server" />
</body>
</html>

[Windows Forms - VB Version] NetWinCharts\VBNetWinCharts\surface3.vb

Imports System
Imports Microsoft.VisualBasic
Imports ChartDirector

Public Class surface3
    Implements DemoModule

    'Name of demo module
    Public Function getName() As String Implements DemoModule.getName
        Return "Surface Chart (3)"
    End Function

    'Number of charts produced in this demo module
    Public Function getNoOfCharts() As Integer Implements DemoModule.getNoOfCharts
        Return 1
    End Function

    'Main code for creating chart.
    'Note: the argument img is unused because this demo only has 1 chart.
    Public Sub createChart(viewer As WinChartViewer, img As String) _
        Implements DemoModule.createChart

        ' The x and y coordinates of the grid
        Dim dataX() As Double = {-10, -9, -8, -7, -6, -5, -4, -3, -2, -1, 0, 1, 2, _
            3, 4, 5, 6, 7, 8, 9, 10}
        Dim dataY() As Double = {-10, -9, -8, -7, -6, -5, -4, -3, -2, -1, 0, 1, 2, _
            3, 4, 5, 6, 7, 8, 9, 10}

        ' The values at the grid points. In this example, we will compute the values
        ' using the formula z = Sin(x * x / 128 - y * y / 256 + 3) * Cos(x / 4 + 1 -
        ' Exp(y / 8))
        Dim dataZ((UBound(dataX) + 1) * (UBound(dataY) + 1) - 1) As Double
        For yIndex As Integer = 0 To UBound(dataY)
            Dim y As Double = dataY(yIndex)
            For xIndex As Integer = 0 To UBound(dataX)
                Dim x As Double = dataX(xIndex)
                dataZ(yIndex * (UBound(dataX) + 1) + xIndex) = Math.Sin(x * x / _
                    128.0 - y * y / 256.0 + 3) * Math.Cos(x / 4.0 + 1 - Math.Exp(y _
                     / 8.0))
            Next
        Next

        ' Create a SurfaceChart object of size 750 x 600 pixels
        Dim c As SurfaceChart = New SurfaceChart(750, 600)

        ' Add a title to the chart using 20 points Times New Roman Italic font
        c.addTitle("Surface Energy Density       ", "Times New Roman Italic", 20)

        ' Set the center of the plot region at (380, 260), and set width x depth x
        ' height to 360 x 360 x 270 pixels
        c.setPlotRegion(380, 260, 360, 360, 270)

        ' Set the elevation and rotation angles to 30 and 210 degrees
        c.setViewAngle(30, 210)

        ' Set the perspective level to 60
        c.setPerspective(60)

        ' Set the data to use to plot the chart
        c.setData(dataX, dataY, dataZ)

        ' Spline interpolate data to a 80 x 80 grid for a smooth surface
        c.setInterpolation(80, 80)

        ' Use semi-transparent black (c0000000) for x and y major surface grid lines.
        ' Use dotted style for x and y minor surface grid lines.
        Dim majorGridColor As Integer = &Hc0000000
        Dim minorGridColor As Integer = c.dashLineColor(majorGridColor, _
            Chart.DotLine)
        c.setSurfaceAxisGrid(majorGridColor, majorGridColor, minorGridColor, _
            minorGridColor)

        ' Set contour lines to semi-transparent white (80ffffff)
        c.setContourColor(&H80ffffff)

        ' Add a color axis (the legend) in which the left center is anchored at (665,
        ' 280). Set the length to 200 pixels and the labels on the right side.
        c.setColorAxis(665, 280, Chart.Left, 200, Chart.Right)

        ' Set the x, y and z axis titles using 12 points Arial Bold font
        c.xAxis().setTitle("X Title<*br*>Placeholder", "Arial Bold", 12)
        c.yAxis().setTitle("Y Title<*br*>Placeholder", "Arial Bold", 12)
        c.zAxis().setTitle("Z Title Placeholder", "Arial Bold", 12)

        ' Output the chart
        viewer.Chart = c

    End Sub

End Class

[Windows Forms - C# Version] NetWinCharts\CSharpWinCharts\surface3.cs

using System;
using ChartDirector;

namespace CSharpChartExplorer
{
    public class surface3 : DemoModule
    {
        //Name of demo module
        public string getName() { return "Surface Chart (3)"; }

        //Number of charts produced in this demo module
        public int getNoOfCharts() { return 1; }

        //Main code for creating chart.
        //Note: the argument img is unused because this demo only has 1 chart.
        public void createChart(WinChartViewer viewer, string img)
        {
            // The x and y coordinates of the grid
            double[] dataX = {-10, -9, -8, -7, -6, -5, -4, -3, -2, -1, 0, 1, 2, 3, 4,
                5, 6, 7, 8, 9, 10};
            double[] dataY = {-10, -9, -8, -7, -6, -5, -4, -3, -2, -1, 0, 1, 2, 3, 4,
                5, 6, 7, 8, 9, 10};

            // The values at the grid points. In this example, we will compute the
            // values using the formula z = Sin(x * x / 128 - y * y / 256 + 3) *
            // Cos(x / 4 + 1 - Exp(y / 8))
            double[] dataZ = new double[(dataX.Length) * (dataY.Length)];
            for(int yIndex = 0; yIndex < dataY.Length; ++yIndex) {
                double y = dataY[yIndex];
                for(int xIndex = 0; xIndex < dataX.Length; ++xIndex) {
                    double x = dataX[xIndex];
                    dataZ[yIndex * (dataX.Length) + xIndex] = Math.Sin(x * x / 128.0
                         - y * y / 256.0 + 3) * Math.Cos(x / 4.0 + 1 - Math.Exp(y /
                        8.0));
                }
            }

            // Create a SurfaceChart object of size 750 x 600 pixels
            SurfaceChart c = new SurfaceChart(750, 600);

            // Add a title to the chart using 20 points Times New Roman Italic font
            c.addTitle("Surface Energy Density       ", "Times New Roman Italic", 20)
                ;

            // Set the center of the plot region at (380, 260), and set width x depth
            // x height to 360 x 360 x 270 pixels
            c.setPlotRegion(380, 260, 360, 360, 270);

            // Set the elevation and rotation angles to 30 and 210 degrees
            c.setViewAngle(30, 210);

            // Set the perspective level to 60
            c.setPerspective(60);

            // Set the data to use to plot the chart
            c.setData(dataX, dataY, dataZ);

            // Spline interpolate data to a 80 x 80 grid for a smooth surface
            c.setInterpolation(80, 80);

            // Use semi-transparent black (c0000000) for x and y major surface grid
            // lines. Use dotted style for x and y minor surface grid lines.
            int majorGridColor = unchecked((int)0xc0000000);
            int minorGridColor = c.dashLineColor(majorGridColor, Chart.DotLine);
            c.setSurfaceAxisGrid(majorGridColor, majorGridColor, minorGridColor,
                minorGridColor);

            // Set contour lines to semi-transparent white (80ffffff)
            c.setContourColor(unchecked((int)0x80ffffff));

            // Add a color axis (the legend) in which the left center is anchored at
            // (665, 280). Set the length to 200 pixels and the labels on the right
            // side.
            c.setColorAxis(665, 280, Chart.Left, 200, Chart.Right);

            // Set the x, y and z axis titles using 12 points Arial Bold font
            c.xAxis().setTitle("X Title\nPlaceholder", "Arial Bold", 12);
            c.yAxis().setTitle("Y Title\nPlaceholder", "Arial Bold", 12);
            c.zAxis().setTitle("Z Title Placeholder", "Arial Bold", 12);

            // Output the chart
            viewer.Chart = c;
        }
    }
}