2016-01-20 4 views
4

Я хотел бы использовать ggplot для создания сложного сюжета, а затем в самом конце, я хотел бы добавить к нему слово «Черновик». Но я хотел бы, чтобы это слово было на спине, а не на фронте. Я знаю, что могу иметь его в спину, просто добавляя его сначала, но это не то, что я хочу. Причина в том, что я хочу написать пользовательскую функцию сохранения, которая добавляет имя исходного файла, используемого для создания фигуры, к оси x, а также отмечает цифру как «Черновик», если не установлен определенный флаг. Моя пользовательская функция делает это, но слово «Черновик» всегда впереди.ggplot2: добавление новой функции и принуждение ее к обратному

Есть ли способ подстроить только аннотированную строку ниже, сохраняя порядок тем же, что будет закладывать черновик за синусоидальную волну?

x = seq(0,100,.1) 
d = data.frame(x=x,y=sin(x)) 

p = ggplot(data=d,aes(x=x,y=y)) + geom_line(size=3,color="grey50") 
p = p + annotate("text",x=50,y=0,label="Draft",color="blue",size=40) 
print(p) 
ggsave(filename = "test_background.pdf") 

enter image description here

+2

почему бы не использовать 'альфа = .2' в вашем аннотирования, чтобы сделать его прозрачным? – scoa

ответ

5

перед построением,

p$layers <- rev(p$layers) 
+0

Это прекрасно, спасибо! –

Смежные вопросы