I am using the affy package to plot a histogram of raw data from an
affymetrix dataset.

Data <- ReadAffy()
hist(Data[,1:4])

The histogram plots fine but I'd like to attach a legend to the plot, or at
least label the plot-lines somehow.  At present there is no way to discern
which of the four lines corresponds to which sample.

	[[alternative HTML version deleted]]