caros, estou a fazer uma figura com a poderosa ggplot2, mas infelizmente não consigo deixar como quero, e só a lenda, que ficou oscura por causa de um recheio que faz o segundo layer que estou a plotar:

aqui vai o codigo:

library(ggplot2)

library(scales)

#primer plot

p4 = ggplot(CPUE_GRAPH, aes(x=HAUL, y=CPUE, linetype=CodEnd)) +

geom_line() + scale_colour_brewer(palette="Set1")+

xlab("Time") + ylab("CPUE (Kg/h)")

#assim e a lenda que eu quero, a que aparece aqui agora

#ficheiro adicional para classificar pela luz do dia

LIGHT2 <- read.csv('C:/projects/masterthesis/LIGHT2.csv')

#estabelescer os ranges

yrng <- range(CPUE_GRAPH$CPUE)

xrng <- range(CPUE_GRAPH$HAUL)

#adicionar as listras obscuras

p4 + geom_rect(aes(NULL, NULL, xmin = start, xmax = end,

fill = light), ymin = yrng[1], ymax = yrng[2],

data = LIGHT2) + scale_fill_manual(values =

alpha(c("white", "black"), 0.05))

# modificar o eixo x

last_plot() + scale_x_discrete(limits=c('17:20', '21:55', '4:40', '10:20', '16:05', '22:10',

'4:10', '10:25', '13:35', '18:45', '00:50', '7:20',

'13:00', '18:35', '1:35', '6:15', '10:05', '16:10',

'00:35', '6:30'))

# modificar ao orientação do eixo x

last_plot()+theme(axis.text.x = element_text(angle=90, vjust=0.5, size=10))

#como posso deixar a lenda só de ConEnd com a primeira figura?

agradeço sua ajuda

mando os dados em adjunto

muito obrigado

Carlos

meu R e a versão 2.15.2 (2012-10-26) trabalho em R studio com SO Windows 7 home premium

--
Carlos A. Pombo Sonderblohm
PhD Student on Marine Science (Fisheries)
Faculdade de Ciências e Tecnología
Universidade do Algarve,
Campus de Gambelas
8005-139 Faro
Portugal
Tef. 289 800 905 ext. 7605