Displaying 1 result from an estimated 1 matches for "results_11".
2012 Sep 14
1
swap hist() colours
...- hist(LR_11_yes$LR_11_p, breaks= c(0.1*0:10), plot="FALSE")
LR_hist11_c_yes <- (LR_hist11_yes$counts)
RK_11_yes <- subset(a, a$kot_clc06 == 11)
RK_hist11_yes <- hist(RK_11_yes$RK_11_p, breaks= c(0.1*0:10), plot="FALSE")
RK_hist11_c_yes <- (RK_hist11_yes$counts)
yes.results_11 <-
data.frame(PAR_hist11_c_yes,LR_hist11_c_yes,RK_hist11_c_yes)
#dataframe to matrix
yes.matrix_11<-data.matrix(yes.results_11)
colnames(yes.matrix_11) <-c ("PAR", "LR", "RK")
barplot(yes.matrix_11, beside =TRUE,ylim=c(0,250))
abline(v=(6),col = "black&qu...