ChartDirector 6.0 (Ruby Edition)
Surface Wireframe
Source Code Listing
require("chartdirector") class SurfacewireframeController < ApplicationController def index() @title = "Surface Wireframe" @ctrl_file = File.expand_path(__FILE__) @noOfCharts = 6 render :template => "templates/chartview" end # # Render and deliver the chart # def getchart() # This script can draw different charts depending on the chartIndex chartIndex = (params["img"]).to_i # The x and y coordinates of the grid dataX = [-2, -1, 0, 1, 2] dataY = [-2, -1, 0, 1, 2] # The values at the grid points. In this example, we will compute the values using the # formula z = square_root(15 - x * x - y * y). dataZ = Array.new(dataX.length * dataY.length, 0) 0.upto(dataY.length - 1) do |yIndex| y = dataY[yIndex] 0.upto(dataX.length - 1) do |xIndex| x = dataX[xIndex] dataZ[yIndex * dataX.length + xIndex] = Math.sqrt(15 - x * x - y * y) end end # Create a SurfaceChart object of size 380 x 340 pixels, with white (ffffff) background and # grey (888888) border. c = ChartDirector::SurfaceChart.new(380, 340, 0xffffff, 0x888888) # Demonstrate various wireframes with and without interpolation if chartIndex == 0 # Original data without interpolation c.addTitle("5 x 5 Data Points\nStandard Shading", "arialbd.ttf", 12) c.setContourColor(0x80ffffff) elsif chartIndex == 1 # Original data, spline interpolated to 40 x 40 for smoothness c.addTitle("5 x 5 Points - Spline Fitted to 40 x 40\nStandard Shading", "arialbd.ttf", 12) c.setContourColor(0x80ffffff) c.setInterpolation(40, 40) elsif chartIndex == 2 # Rectangular wireframe of original data c.addTitle("5 x 5 Data Points\nRectangular Wireframe") c.setShadingMode(ChartDirector::RectangularFrame) elsif chartIndex == 3 # Rectangular wireframe of original data spline interpolated to 40 x 40 c.addTitle("5 x 5 Points - Spline Fitted to 40 x 40\nRectangular Wireframe") c.setShadingMode(ChartDirector::RectangularFrame) c.setInterpolation(40, 40) elsif chartIndex == 4 # Triangular wireframe of original data c.addTitle("5 x 5 Data Points\nTriangular Wireframe") c.setShadingMode(ChartDirector::TriangularFrame) else # Triangular wireframe of original data spline interpolated to 40 x 40 c.addTitle("5 x 5 Points - Spline Fitted to 40 x 40\nTriangular Wireframe") c.setShadingMode(ChartDirector::TriangularFrame) c.setInterpolation(40, 40) end # Set the center of the plot region at (200, 170), and set width x depth x height to 200 x # 200 x 150 pixels c.setPlotRegion(200, 170, 200, 200, 150) # Set the plot region wall thichness to 5 pixels c.setWallThickness(5) # Set the elevation and rotation angles to 20 and 30 degrees c.setViewAngle(20, 30) # Set the data to use to plot the chart c.setData(dataX, dataY, dataZ) # Output the chart send_data(c.makeChart2(ChartDirector::JPG), :type => "image/jpeg", :disposition => "inline") end end |
<html> <body style="margin:5px 0px 0px 5px"> <!-- Title --> <div style="font-size:18pt; font-family:verdana; font-weight:bold"> <%= @title %> </div> <hr style="border:solid 1px #000080" /> <!-- Source Code Listing Link --> <div style="font-size:9pt; font-family:verdana; margin-bottom:1.5em"> <%= link_to "Source Code Listing", :controller => "cddemo", :action => "viewsource", :ctrl_file => @ctrl_file, :view_file => File.expand_path(__FILE__) %> </div> <!-- Create one or more IMG tags to display the demo chart(s) --> <% 0.upto(@noOfCharts - 1) do |i| %> <img src="<%= url_for(:action => "getchart", :img => i) %>"> <% end %> </body> </html> |
#!/usr/bin/env ruby require("chartdirector") def createChart(chartIndex) # The x and y coordinates of the grid dataX = [-2, -1, 0, 1, 2] dataY = [-2, -1, 0, 1, 2] # The values at the grid points. In this example, we will compute the values using the formula z # = square_root(15 - x * x - y * y). dataZ = Array.new(dataX.length * dataY.length, 0) 0.upto(dataY.length - 1) do |yIndex| y = dataY[yIndex] 0.upto(dataX.length - 1) do |xIndex| x = dataX[xIndex] dataZ[yIndex * dataX.length + xIndex] = Math.sqrt(15 - x * x - y * y) end end # Create a SurfaceChart object of size 380 x 340 pixels, with white (ffffff) background and grey # (888888) border. c = ChartDirector::SurfaceChart.new(380, 340, 0xffffff, 0x888888) # Demonstrate various wireframes with and without interpolation if chartIndex == 0 # Original data without interpolation c.addTitle("5 x 5 Data Points\nStandard Shading", "arialbd.ttf", 12) c.setContourColor(0x80ffffff) elsif chartIndex == 1 # Original data, spline interpolated to 40 x 40 for smoothness c.addTitle("5 x 5 Points - Spline Fitted to 40 x 40\nStandard Shading", "arialbd.ttf", 12) c.setContourColor(0x80ffffff) c.setInterpolation(40, 40) elsif chartIndex == 2 # Rectangular wireframe of original data c.addTitle("5 x 5 Data Points\nRectangular Wireframe") c.setShadingMode(ChartDirector::RectangularFrame) elsif chartIndex == 3 # Rectangular wireframe of original data spline interpolated to 40 x 40 c.addTitle("5 x 5 Points - Spline Fitted to 40 x 40\nRectangular Wireframe") c.setShadingMode(ChartDirector::RectangularFrame) c.setInterpolation(40, 40) elsif chartIndex == 4 # Triangular wireframe of original data c.addTitle("5 x 5 Data Points\nTriangular Wireframe") c.setShadingMode(ChartDirector::TriangularFrame) else # Triangular wireframe of original data spline interpolated to 40 x 40 c.addTitle("5 x 5 Points - Spline Fitted to 40 x 40\nTriangular Wireframe") c.setShadingMode(ChartDirector::TriangularFrame) c.setInterpolation(40, 40) end # Set the center of the plot region at (200, 170), and set width x depth x height to 200 x 200 x # 150 pixels c.setPlotRegion(200, 170, 200, 200, 150) # Set the plot region wall thichness to 5 pixels c.setWallThickness(5) # Set the elevation and rotation angles to 20 and 30 degrees c.setViewAngle(20, 30) # Set the data to use to plot the chart c.setData(dataX, dataY, dataZ) # Output the chart c.makeChart("surfacewireframe%s.jpg" % chartIndex) end createChart(0) createChart(1) createChart(2) createChart(3) createChart(4) createChart(5) |