A gallery of built in plots for Mathematica 9 using deafult settings only.
Mike Croucher - www.walkingrandomly.com

(*Panel Generation*)
labelstyle={FontFamily -> "Arial", FontSize -> 14,Bold};
labelalign={Center,Top};
SetAttributes[genpanel,HoldAll];
genpanel[x_]:=Module[{head,usagestring,usage},
head=ToString[Head[Unevaluated[x]]];
usagestring=head<>"::usage";
usage=ToExpression[usagestring];
Pane[Column[{Style[head,labelstyle],Tooltip[x,usage]},Alignment->labelalign]]
]
(*2D Function - Function in, 2D plot out*)
contourplot=genpanel[ContourPlot[Cos[x]+Cos[y],{x,0,4Pi},{y,0,4Pi}]];
densityplot=genpanel[DensityPlot[Sin[x]Sin[y],{x,-4,4},{y,-3,3}]];
plot=genpanel[Plot[Sin[x],{x,-Pi,Pi}]];
logplot = genpanel[LogPlot[x^x,{x,1,5}]];
loglinearplot =  genpanel[LogLinearPlot[Tanh[x],{x,1,100}]];
loglogplot=genpanel[LogLogPlot[x^2+x^3,{x,1,100}]];
polarplot=genpanel[PolarPlot[Sin[3t],{t,0,Pi}]];
parametricplot=genpanel[ParametricPlot[{Sin[u],Sin[2u]},{u,0,2Pi}]];
regionplot=genpanel[RegionPlot[x^2+y^3<2,{x,-2,2},{y,-2,2}]];
(*2D List - List in, 2D plot out*)
arrayplot=genpanel[ArrayPlot[RandomReal[1,{100,100}]]];
datelistlogplot=genpanel[DateListLogPlot[Range[50,1000,50],{2007,1,1}]];
datelistplot=genpanel[DateListPlot[{1,1,2,3,5,8,11},{2000,8}]];
discreteplot=genpanel[DiscretePlot[PrimePi[k],{k,1,50}]];
listcontourplot=genpanel[ListContourPlot[Table[Sin[i+j^2],{i,0,3,0.1},{j,0,3,0.1}]]];
listcurvepathplot=genpanel[ListCurvePathPlot[RandomReal[{0,10},{2000,2}]]];
listdensityplot=genpanel[ListDensityPlot[{{1,1,1,1},{1,2,1,2},{1,1,3,1},{1,2,1,4}}]];
listplot=genpanel[ListPlot[{1,2,3,4,5,6,7,8,9,10}]];
listpolarplot=genpanel[ListPolarPlot[Table[Sqrt[n],{n,100}]]];
listlineplot = genpanel[ListLinePlot[Prime[Range[25]]]];
listloglinearplot=genpanel[ListLogLinearPlot[Table[{n,Sqrt[n]},{n,100}]]];
listloglogplot=genpanel[ListLogLogPlot[Range[20]^3]];
listlogplot=genpanel[ListLogPlot[Table[PartitionsQ[n],{n,50}]]];
matrixplot=genpanel[MatrixPlot[{{1,2,1},{3,0,1},{0,0,-1}}]];
reliefplot=genpanel[ReliefPlot[Import["http://exampledata.wolfram.com/hailey.dem.gz","Data"],ColorFunction->"GreenBrownTerrain"]];
(*3D Function - Function in, 3D plot out*)
plot3d=genpanel[Plot3D[Sin[x+y^2],{x,-3,3},{y,-2,2}]];
contourplot3d=genpanel[ContourPlot3D[x^3+y^2-z^2==0,{x,-2,2},{y,-2,2},{z,-2,2}]];
discreteplot3d=genpanel[DiscretePlot3D[PDF[MultivariatePoissonDistribution[3,{1,1}],{t,u}],{t,0,10},{u,0,10}]];
parametricplot3d=genpanel[ParametricPlot3D[{Cos[u],Sin[u]+Cos[v],Sin[v]},{u,0,2π},{v,-π,π}]];
regionplot3d=genpanel[RegionPlot3D[x^2+y^3-z^2>0,{x,-2,2},{y,-2,2},{z,-2,2}]];
revolutionplot3d=genpanel[RevolutionPlot3D[{2+Cos[t],Sin[t]},{t,0,2Pi}]];
sphericalplot3d=genpanel[SphericalPlot3D[{1,2,3},{θ,0,Pi},{ϕ,0,3Pi/2}]];
(*3D List - List in, 3D plot out*)
listcontourplot3d=genpanel[ListContourPlot3D[Table[x^2+y^2-z^2+RandomReal[0.1],{x,-2,2,0.2},{y,-2,2,0.2},{z,-2,2,0.2}],Contours->{0}]];
listpointplot3d=genpanel[ListPointPlot3D[Table[Sin[j^2+i],{i,0,3,0.1},{j,0,3,0.1}]]];
listplot3d=genpanel[ListPlot3D[{{1,1,1,1},{1,2,1,2},{1,1,3,1},{1,2,1,4}}]];
listsurfaceplot3d=genpanel[ListSurfacePlot3D[ExampleData[{"Geometry3D","StanfordBunny"},"VertexData"]]];
(* Charts*)
barchart=genpanel[BarChart[{{1,2,3},{1,3,2}}]];
barchart3d=genpanel[BarChart3D[{{1,2,3},{1,3,2}}]];
boxwhiskerchart=genpanel[BoxWhiskerChart[Table[RandomVariate[NormalDistribution[μ,1],100],{μ,{0,3,2,5}}]]];
bubblechart=genpanel[BubbleChart[RandomReal[1,{5,7,3}]]];
bubblechart3d=genpanel[BubbleChart3D[RandomReal[1,{5,10,4}]]];
candlestickchart=genpanel[CandlestickChart[FinancialData["GOOG","OHLC",{{2009,5,1},{2010,4,30}}]]];
distributionchart=genpanel[DistributionChart[RandomReal[BetaDistribution[2,1/4],{6,100}]]];
kagichart=genpanel[KagiChart[FinancialData["GOOG","Close",{{2009,5,1},{2010,4,30},"Day"}]]];
linebreakchart=genpanel[LineBreakChart["^GSPC"]];
pairedbarchart=genpanel[PairedBarChart[{1,3,5},{2,4,6}]];
piechart=genpanel[PieChart[{1,2,3,4}]];
piechart3d=genpanel[PieChart3D[{1,2,3,4}]];
pointfigurechart=genpanel[PointFigureChart["^GSPC"]];
rectanglechart=genpanel[RectangleChart[{{{1,1},{1,2},{2,3}},{{1,1},{2,1}}}]];
rectanglechart3d=genpanel[RectangleChart3D[{{{2,3,3},{1,2,2},{1,1,1}},{{1,3,2},{2,1,1}}}]];
renkochart=genpanel[RenkoChart["^GSPC"]];
sectorchart=genpanel[SectorChart[{{1,1},{1,2},{1,3}}]];
sectorchart3d=genpanel[SectorChart3D[{{2,2,3},{2,1,2},{1,2,1}}]];
(*Interactive Trading charts)*)
inttradchart=genpanel[InteractiveTradingChart[{"GOOG",{{2009,1,1},{2009,12,31}}}]];
tradingchart=genpanel[TradingChart["SP500"]];
(*Control Theory*)
bode=genpanel[BodePlot[20/(s+20)]];
nicholsplot=genpanel[NicholsPlot[(TransferFunctionModel[((10 (0.5+s) (1+10 s))/(s (2+s))), ])]];
nyquistplot=genpanel[NyquistPlot[(TransferFunctionModel[((10 (1+3 s) (1+4 s))/((1+s) (2+s) (5+s) (6+s))), ])]];
rootlocusplot=genpanel[RootLocusPlot[(TransferFunctionModel[((k (1+s))/((-1+s) s (16+4 s+(s^2)))), ]),{k,0,80}]];
singularvalueplot=genpanel[SingularValuePlot[(TransferFunctionModel[((-100+s)/(100+(s^2))), ((10 (1+s))/(100+(s^2))), -((10 (1+s))/(100+(s^2))), ((-100+s)/(100+(s^2))), ])]];
(*Graph Theory*)
communitygraphplot=genpanel[CommunityGraphPlot[ExampleData[{"NetworkGraph","DolphinSocialNetwork"}]]];
graphplot=genpanel[GraphPlot[{1->2,2->1,3->1,3->2,4->1,4->2,4->4}]];
graphplot3d=genpanel[GraphPlot3D[{1->2,1->3,1->4,1->5,2->3,2->4,2->5,3->4,3->5,4->5}]];
layeredgraphplot = genpanel[LayeredGraphPlot[{1->2,1->3,2->3,1->4,2->4,1->5}]];
treeplot=genpanel[TreePlot[{1->4,1->6,1->8,2->6,3->8,4->5,7->8}]];
(*Vector field*)
lineintegralconvolutionplot =genpanel[LineIntegralConvolutionPlot[{-1-x^2+y,1+x-y^2},{x,-3,3},{y,-3,3}]];
listlineintegralconvolutionplot =genpanel[ListLineIntegralConvolutionPlot[Table[{{x,y},{y,x-x^2}},{x,-1.5,1.5,0.2},{y,-2,2,0.2}]]];
liststreamdensityplot=genpanel[ListStreamDensityPlot[Table[{{x,y},{y,x-x^2}},{x,-1.5,1.5,0.2},{y,-2,2,0.2}]]];
liststreamplot=genpanel[ListStreamPlot[Table[{-1-x^2+y,1+x-y^2},{x,-3,3,.2},{y,-3,3,.2}]]];
listvectordensityplot=genpanel[ListVectorDensityPlot[Table[{y,-x},{x,-3,3,0.2},{y,-3,3,0.2}]]];
listvectorplot=genpanel[ListVectorPlot[Table[{y,-x},{x,-3,3,0.2},{y,-3,3,0.2}]]];
listvectorplot3d=genpanel[ListVectorPlot3D[Table[{x,y,z},{x,-1,1,.1},{y,-1,1,.1},{z,-1,1,.1}]]];
streamdensityplot=genpanel[StreamDensityPlot[{-1-x^2+y,1+x-y^2},{x,-3,3},{y,-3,3}]];
streamplot=genpanel[StreamPlot[{-1-x^2+y,1+x-y^2},{x,-3,3},{y,-3,3}]];
vectordensityplot=genpanel[VectorDensityPlot[{y,-x},{x,-3,3},{y,-3,3}]];
vectorplot=genpanel[VectorPlot[{y,-x},{x,-3,3},{y,-3,3}]];
vectorplot3d=genpanel[VectorPlot3D[{x,y,z},{x,-1,1},{y,-1,1},{z,-1,1}]];
(*Wavelets*)
waveletimageplot=genpanel[WaveletImagePlot[DiscreteWaveletTransform[,Automatic,3]]];
waveletlistplot=genpanel[WaveletListPlot[DiscreteWaveletTransform[Table[2-5 t+5 Exp[-500 (t-0.5)^2],{t,0.,1.,1/128}],Automatic,4]]];
waveletmatrixplot=genpanel[WaveletMatrixPlot[DiscreteWaveletTransform[CrossMatrix[5],Automatic,2]]];
waveletscalogram=genpanel[WaveletScalogram[ContinuousWaveletTransform[Table[Sign[Cos[(x^2)]],{x,-6,6,0.05}]]]];
(*Probability*)
densityhistogram=genpanel[DensityHistogram[RandomVariate[BinormalDistribution[.5],500]]];
histogram=genpanel[Histogram[RandomVariate[NormalDistribution[0,1],200]]];
histogram3d=genpanel[Histogram3D[RandomVariate[NormalDistribution[0,1],{500,2}]]];
pairedhistogram=genpanel[PairedHistogram[RandomVariate[NormalDistribution[0,1],100],RandomVariate[NormalDistribution[1,1/2],100]]];
pairedsmoothhistogram=genpanel[PairedSmoothHistogram[RandomVariate[NormalDistribution[0,1],100],RandomVariate[NormalDistribution[1,1/2],100]]];
probabilityplot=genpanel[ProbabilityPlot[RandomVariate[NormalDistribution[1,2],100]]];
probabilityscaleplot = genpanel[ProbabilityScalePlot[RandomVariate[NormalDistribution[1,2],100],"Normal"]];
quantileplot=genpanel[QuantilePlot[RandomVariate[UniformDistribution[{0,1}],100]]];
smoothdensityhistogram=genpanel[SmoothDensityHistogram[RandomVariate[BinormalDistribution[.5],10]]];
smoothhistogram=genpanel[SmoothHistogram[Table[RandomVariate[NormalDistribution[c,1],500],{c,0,5}]]];
smoothhistogram3d=genpanel[SmoothHistogram3D[RandomVariate[BinormalDistribution[.5],10]]];
imagehistogram=genpanel[ImageHistogram[]];
(*Gauges*)
angulargauge=genpanel[AngularGauge[42,{0,100}]];
bulletgauge=genpanel[BulletGauge[60,88,{0,100}]];
clockgauge=genpanel[ClockGauge[]];
horizontalgauge=genpanel[HorizontalGauge[55,{0,100}]];
thermometergauge=genpanel[ThermometerGauge[25,{0,100}]];
verticalgauge=genpanel[VerticalGauge[55,{0,100}]];


(*Construct Grids*)
twodimcont=Grid[{
{contourplot,densityplot,discreteplot,loglinearplot,logplot},
{loglogplot,parametricplot,plot,polarplot,regionplot}
},
ItemSize->13.5,Frame->All];
twodimlist=Grid[{
{arrayplot,datelistplot,datelistlogplot,listcontourplot,listcurvepathplot},
{listdensityplot,listlineplot,listloglinearplot,listloglogplot,listlogplot},
{listplot,listpolarplot,matrixplot,reliefplot}
},
ItemSize->13.5,Frame->All];
threedim=Grid[{
{contourplot3d,discreteplot3d,parametricplot3d,plot3d,regionplot3d},
{revolutionplot3d,sphericalplot3d}
},
ItemSize->13.5,Frame->All];
threedimlist=Grid[{
{listcontourplot3d,listpointplot3d},
{listplot3d,listsurfaceplot3d}
},
ItemSize->33.75,Frame->All];
charts=Grid[{
{barchart,barchart3d,boxwhiskerchart,bubblechart,bubblechart3d},
{candlestickchart,distributionchart,kagichart,linebreakchart,pairedbarchart},
{piechart,piechart3d,pointfigurechart,rectanglechart,rectanglechart3d},
{renkochart,sectorchart,sectorchart3d,tradingchart}
},
ItemSize->13.5,Frame->All];
control=Grid[{
{bode,nicholsplot,nyquistplot},
{rootlocusplot,singularvalueplot}
},
ItemSize->22.5,Frame->All];
graph=Grid[{
{communitygraphplot,graphplot,graphplot3d},
{layeredgraphplot ,treeplot}
},
ItemSize->22.5,Frame->All];
vecfields=Grid[{
{lineintegralconvolutionplot,listlineintegralconvolutionplot, liststreamdensityplot,liststreamplot,listvectordensityplot},
{listvectorplot,listvectorplot3d,streamdensityplot,streamplot,vectordensityplot},
{vectorplot,vectorplot3d}
},
ItemSize->13.5,Frame->All];
wavelets=Grid[{
{waveletimageplot,waveletlistplot},
{waveletmatrixplot,waveletscalogram}
},ItemSize->33.75,Frame->All];
probability=Grid[{
{densityhistogram,histogram,histogram3d,imagehistogram,pairedhistogram},
{pairedsmoothhistogram,probabilityplot,probabilityscaleplot,quantileplot,smoothdensityhistogram},
{smoothhistogram,smoothhistogram3d}
},
ItemSize->13.5,Frame->All];
gauges=Grid[{
{angulargauge,bulletgauge,clockgauge,horizontalgauge,thermometergauge},
{verticalgauge}
},
ItemSize->13.5,Frame->All];
trade=Grid[{
{inttradchart}
},
Frame->All];
(*Construct TabView*)
TabView[{
Tooltip[Style["2D Expression", FontFamily -> "Arial", FontSize -> 14],"Input:Expression Output:3D plot"]->twodimcont,
Tooltip[Style["2D List", FontFamily -> "Arial", FontSize -> 14],"Input:List Output:2D plot"]->twodimlist,
Tooltip[Style["3D Expression", FontFamily -> "Arial", FontSize -> 14],"Input:Expression Output:3D Plot"]->threedim,
Tooltip[Style["3D List", FontFamily -> "Arial", FontSize -> 14],"Input:List Output:3D Plot"]->threedimlist,
Tooltip[Style["Charts", FontFamily -> "Arial", FontSize -> 14],"Input:List Output:3D Plot"]->charts,
Tooltip[Style["Control Theory", FontFamily -> "Arial", FontSize -> 14],"Specialist Control Theory Plots"]->control,
Tooltip[Style["Graph Theory", FontFamily -> "Arial", FontSize -> 14],"Specialist Graph Theory Plots"]->graph,
Tooltip[Style["Vector Fields", FontFamily -> "Arial", FontSize -> 14],"Specialist Vector Field Plots"]->vecfields,
Tooltip[Style["Wavelets", FontFamily -> "Arial", FontSize -> 14],"Specialist Wavelet Plots"]->wavelets,
Tooltip[Style["Gauges", FontFamily -> "Arial", FontSize -> 14],"Gauges"]->gauges,
Tooltip[Style["Probability", FontFamily -> "Arial", FontSize -> 14],"Specialist Probability Plots"]->probability,
Tooltip[Style["Interactive Trading", FontFamily -> "Arial", FontSize -> 14],"Interactive Trading Chart"]->trade
}
,ImageSize->Automatic
]

allplots=Map[Rasterize,{contourplot,densityplot,discreteplot,loglinearplot,logplot,loglogplot,parametricplot,plot,polarplot,regionplot,arrayplot,datelistplot,datelistlogplot,listcontourplot,listcurvepathplot,listdensityplot,listlineplot,listloglinearplot,listloglogplot,listlogplot,listplot,listpolarplot,matrixplot,reliefplot,contourplot3d,discreteplot3d,parametricplot3d,plot3d,regionplot3d,
revolutionplot3d,sphericalplot3d,listcontourplot3d,listpointplot3d,listplot3d,listsurfaceplot3d,barchart,barchart3d,boxwhiskerchart,bubblechart,bubblechart3d,candlestickchart,distributionchart,kagichart,linebreakchart,pairedbarchart,piechart,piechart3d,pointfigurechart,rectanglechart,rectanglechart3d,
renkochart,sectorchart,sectorchart3d,tradingchart,bode,nicholsplot,nyquistplot,rootlocusplot,singularvalueplot,communitygraphplot,graphplot,graphplot3d,layeredgraphplot ,treeplot,lineintegralconvolutionplot,listlineintegralconvolutionplot, liststreamdensityplot,liststreamplot,listvectordensityplot,listvectorplot,listvectorplot3d,streamdensityplot,streamplot,vectordensityplot,vectorplot,vectorplot3d,waveletimageplot,waveletlistplot,waveletmatrixplot,waveletscalogram
densityhistogram,histogram,histogram3d,imagehistogram,pairedhistogram,
pairedsmoothhistogram,probabilityplot,probabilityscaleplot,quantileplot,smoothdensityhistogram,
,smoothhistogram,smoothhistogram3d,angulargauge,bulletgauge,clockgauge,horizontalgauge,thermometergauge,verticalgauge,inttradchart}]