Graphics.Gnuplot.Simple

This is a simple monolithic interface to gnuplot that can be used as is in GHCi or Hugs. We do not plan to support every feature of gnuplot here, instead we provide an advanced modularized interface in Graphics.Gnuplot.Advanced.

This was formerly part of the htam package.

Documentation

data Attribute

Constructors

Custom String [String]

anything that is allowed after gnuplot's set command

EPS FilePath

PNG FilePath

Terminal T

you cannot use this, call terminal instead

Grid (Maybe [String])

Key (Maybe [String])

Border (Maybe [String])

XTicks (Maybe [String])

YTicks (Maybe [String])

Size Size

Aspect Aspect

BoxAspect Aspect

LineStyle Int [LineAttr]

Title String

XLabel String

YLabel String

XRange (Double, Double)

YRange (Double, Double)

ZRange (Double, Double)

Palette [(Double, (Double, Double, Double))]

ColorBox (Maybe [String])

XTime

XFormat String

data Size

Constructors

Scale Double

SepScale Double Double

data Aspect

Constructors

Ratio Double

NoRatio

data LineAttr

Be careful with LineTitle which can only be used as part of gnuplot's plot command but not as part of set. That is,

 plotList [LineStyle 0 [LineTitle "foobar"]] [0,5..100::Double]

will leave you with an invalid gnuplot script, whereas

 plotListStyle [] (defaultStyle {lineSpec = CustomStyle [LineTitle "foobar"]}) [0,5..100::Double]

does what you want.

The Int types would be better enumerations but their interpretations depend on the gnuplot output type. :-(

Constructors

LineType Int

LineWidth Double

PointType Int

PointSize Double

LineTitle String

data LineSpec

Constructors

DefaultStyle Int

CustomStyle [LineAttr]

data PlotType

Constructors

Lines

Points

LinesPoints

Impulses

Dots

Steps

FSteps

HiSteps

ErrorBars

XErrorBars

YErrorBars

XYErrorBars

ErrorLines

XErrorLines

YErrorLines

XYErrorLines

Boxes

FilledCurves

BoxErrorBars

BoxXYErrorBars

FinanceBars

CandleSticks

Vectors

PM3d

data PlotStyle

Constructors

PlotStyle

Fields

plotType :: PlotType

lineSpec :: LineSpec

linearScale :: Fractional a => Integer -> (a, a) -> [a]

defaultStyle :: PlotStyle

terminal :: C term => term -> Attribute

plotList :: C a => [Attribute] -> [a] -> IO ()

 plotList [] (take 30 (let fibs = 0 : 1 : zipWith (+) fibs (tail fibs) in fibs))

plotListStyle :: C a => [Attribute] -> PlotStyle -> [a] -> IO ()

 plotListStyle [] (defaultStyle{plotType = CandleSticks}) (Plot2D.functionToGraph (linearScale 32 (0,2*pi::Double)) (\t -> (-sin t, -2*sin t, 2*sin t, sin t)))

plotLists :: C a => [Attribute] -> [[a]] -> IO ()

plotListsStyle :: C a => [Attribute] -> [(PlotStyle, [a])] -> IO ()

plotFunc :: (C a, C a) => [Attribute] -> [a] -> (a -> a) -> IO ()

 plotFunc [] (linearScale 1000 (-10,10)) sin

plotFuncs :: (C a, C a) => [Attribute] -> [a] -> [a -> a] -> IO ()

 plotFuncs [] (linearScale 1000 (-10,10)) [sin, cos]

plotPath :: C a => [Attribute] -> [(a, a)] -> IO ()

plotPaths :: C a => [Attribute] -> [[(a, a)]] -> IO ()

plotPathStyle :: C a => [Attribute] -> PlotStyle -> [(a, a)] -> IO ()

plotPathsStyle :: C a => [Attribute] -> [(PlotStyle, [(a, a)])] -> IO ()

plotParamFunc :: (C a, C a) => [Attribute] -> [a] -> (a -> (a, a)) -> IO ()

 plotParamFunc [] (linearScale 1000 (0,2*pi)) (\t -> (sin (2*t), cos t))

plotParamFuncs :: (C a, C a) => [Attribute] -> [a] -> [a -> (a, a)] -> IO ()

 plotParamFuncs [] (linearScale 1000 (0,2*pi)) [\t -> (sin (2*t), cos t), \t -> (cos t, sin (2*t))]

plotDots :: (C a, C a) => [Attribute] -> [(a, a)] -> IO ()

data Plot3dType

Constructors

Surface

ColorMap

data CornersToColor

Constructors

Mean

GeometricMean

Median

Corner1

Corner2

Corner3

Corner4

data Attribute3d

Constructors

Plot3dType Plot3dType

CornersToColor CornersToColor

plotMesh3d :: (C x, C y, C z, C x, C y, C z) => [Attribute] -> [Attribute3d] -> [[(x, y, z)]] -> IO ()

 let xs = [-2,-1.8..2::Double] in plotMesh3d [] [] (do x <- xs; return (do y <- xs; return (x,y,cos(x*x+y*y))))

 let phis = linearScale 30 (-pi, pi :: Double) in plotMesh3d [] [] (do phi <- phis; return (do psi <- phis; let r = 5 + sin psi in return (r * cos phi, r * sin phi, cos psi)))

plotFunc3d :: (C x, C y, C z, C x, C y, C z) => [Attribute] -> [Attribute3d] -> [x] -> [y] -> (x -> y -> z) -> IO ()

 let xs = [-2,-1.8..2::Double] in plotFunc3d [] [] xs xs (\x y -> exp(-(x*x+y*y)))

epspdfPlot

Arguments

:: FilePath

-> ([Attribute] -> IO ())

Drawing function that expects some gnuplot attributes.

-> IO ()

Redirects the output of a plotting function to an EPS file and additionally converts it to PDF.

inclPlot

Arguments

:: FilePath

-> ([Attribute] -> IO ())

Drawing function that expects some gnuplot attributes.

-> IO String

Creates an EPS and a PDF graphics and returns a string that can be inserted into a LaTeX document to include this graphic.

Different from GHCi, Hugs doesn't output a return value from an IO monad. So you must wrap it with a putStr. Nevertheless this implementation which returns the LaTeX command as string is the most flexible one.