:notebook output.html

nBars = 3 
colors = ['maroon', 'goldenrod', 'dark_olive_green'] 
data = randomu(seed, 10, nBars) 
b = barplot(data[*,0], nbars=nBars, index=0, fill_color=colors[0], $
            axis_style=1, /overplot, font_size=11, dimensions=[800, 300]) 
for i = 1L, nBars - 1L do $
  b = barplot(data[*,i], nbars=nBars, index=i, fill_color=colors[i], $ 
              axis_style=1, /overplot, font_size=11)

:save_graphic

restore, filepath('globalwinds.dat', subdir=['examples','data'])
s = streamline(u, v, x, y, rgb_table=3, auto_color=1, $
               x_streamparticles=50, y_streamparticles=50, arrow_size=0., $
               font_size=11)
help, s

:save_graphic

n = 100
y = sin(findgen(n) / (n - 1) * 360 * !dtor) $
      + smooth(randomu(seed, 360) * 0.1, 3, /edge_truncate)
yerror = randomu(seed, n) * 0.1
yerror = smooth(yerror, 3, /edge_truncate)
x = findgen(n) 
p = errorplot(x, y, yerror, errorbar_capsize=0., errorbar_color='red', $
              dimensions=[800, 300], font_size=11)
help, p

:save_graphic

restore, filename=file_which('marbells.dat')
fill = contour(elev, n_levels=20, rgb_table=4, dimensions=[500, 500], $
               font_size=11)

:save_graphic               

map = map('Mercator', limit=[32, -120, 46, -92], $
          fill_color='light_blue', title='Colorado')
 
grid = map.mapgrid
grid.linestyle = 'dotted'
grid.label_position = 0
grid.font_size = 11
grid.grid_latitude = 2
grid.grid_longitude = 2

states = mapcontinents(/usa, fill_color='light green', thick=2., combine=0)
 
m = map['Colorado']
m.fill_color = 'orange'

map['40N'].linestyle = 'dashed' 

area = mapgrid(color='red', $
               longitude_min=-112., longitude_max=-104.5, $
               latitude_min=35.5, latitude_max=41.5, $
               grid_longitude=0.5, grid_latitude=0.5, $
               label_show=0)
print, map

:save_graphic

restore, filename=file_which('cow10.sav')
range = [-0.6, 0.6]
p = plot3d(range, range, range, /nodata, axis_style=2)
axes = p.axes
axes[2].hide = 1
axes[6].hide = 1
axes[7].hide = 1
cow = polygon(x, y, z, connectivity=polylist, /data)

:save_graphic