отрегулировать галочки по оси x и цвет штриховки в geom_bar (сгруппированный штрих-код)

Question

Я просмотрел множество руководств, но, похоже, не может расколоться, что должно быть основной парой команд в R.

Я пытаюсь создать в ggplot2 сгруппированный barplot, используя средние процентные данные из 11 категорий (variable: до , которые представляют собой количество раз поток лосося был причислен) за два с половиной раза (periods & : Перед & После).

Мои основные данные являются следующие:

period 1 = (0)7.5, (1)2.9, (2)6.8, (3)3.9, (4)4.1, (5)7.7, (6)4.4, (7)8.7, (8)10.8, (9)14.5, (10)28.8; 
period 2 = (0)8.7, (1)2.5, (2)2.7, (3)6.5, (4)8.3, (5)7.9, (6)6.5, (7)8.8, (8)13.1, (9)13.7, (10)21.3; 

Код я использовал до сих пор для получения парных barplot является:

ggplot(data=data, aes(x=variable, y=value, fill=factor(period))) + 
geom_bar(stat="identity", position="dodge") + 
scale_fill_discrete(name="Period", breaks=c(1,2), labels=c("Before WSP", "After WSP")) + 
xlab("Monitoring effort") + 
ylab("Mean percentage") 

который производит

/Users/цена/рабочий стол/парная barplot.pdf

Мой вопрос в том, как изменить тиклы оси x, чтобы все они отображались (от 0 до 10 .... не просто «0», «2,5» и т. Д.) И не были десятичными, а целыми числами , и как изменить цвет моих баров на шкалу серого, не нарушая команду «заливки» моей легенды?

Благодарен за помощь

Answer 1

Я не совсем уверен, чего вы хотите.

Я adapated свой ggplot код вроде этого:

ggplot(data=data, aes(x=measure, y=value, fill=factor(timestamp))) + 
    geom_bar(stat="identity", position="dodge") + 
    xlab("Monitoring effort") + 
    ylab("Mean percentage") + 
    scale_fill_manual(values = c("#aeaeae", "#0a0a0a"), labels=c("Before WSP", "After WSP")) + 
    scale_y_continuous(breaks = seq(0,30,by=5)) 

, который производит этот сюжет:

Примечание scale_y_continuous с перерывами, указанных и scale_fill_manual с цветами.

это данные:

 measure timestamp value 
1 measure1  time1 7.5 
2 measure2  time1 2.9 
3 measure3  time1 6.8 
4 measure4  time1 3.9 
5 measure5  time1 4.1 
6 measure6  time1 7.7 
7 measure7  time1 4.4 
8 measure8  time1 8.7 
9 measure9  time1 10.8 
10 measure10  time1 14.5 
11 measure11  time1 28.8 
12 measure1  time2 8.7 
13 measure2  time2 2.5 
14 measure3  time2 2.7 
15 measure4  time2 6.5 
16 measure5  time2 8.3 
17 measure6  time2 7.9 
18 measure7  time2 6.5 
19 measure8  time2 8.8 
20 measure9  time2 13.1 
21 measure10  time2 13.7 
22 measure11  time2 21.3