# ===============================
# test function
# load data
data(p)
# add legend
annoLegend(object = p,
labels = paste('legend ',1:5),
pch = 21,
col = 'black',
fill = useMyCol('paired',5),
textSize = 15)
# change pos
annoLegend(object = p,
relPos = c(0.2,0.9),
labels = paste('legend ',1:5),
pch = 21,
col = 'black',
fill = useMyCol('paired',5),
textSize = 15)
Run the code above in your browser using DataLab