2015-12-14 6 views
-9

У меня есть следующие данные.Как построить рисунок с помощью ggplot2?

Variables Cropland Forest Shrub Urban Water Baresoil MeanDecreaseAccuaracy MeanDecreaseGini 
band1  23.152 14.686 30.012 26.866 12.976 9.767    33.991   142.946 
band2  23.359 19.116 30.077 23.961 14.120 11.793    32.729   165.892 
band3  24.835 21.590 17.912 18.490 14.806 23.961    32.254   169.372 
band4  25.709 34.052 20.737 23.170 13.894 25.297    36.721   209.631 
band5  20.158 29.281 24.762 25.535 18.537 14.182    36.525   141.047 
band6  32.447 25.134 24.800 35.590 22.485 16.168    40.496   232.536 
band7  26.135 41.411 36.753 26.935 19.767 9.806    39.886   226.782 
band8  2.460 1.930 1.872 -0.434 -0.088 4.831     4.315   5.334 

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

following figure.

+0

Вы должны сделать некоторые из ваших собственных работ. SO не является кодовым письмом. – Heroka

+0

После редактирования вопрос не улучшился до такой степени, что я бы хотел его повторно открыть. Сожалею. Пожалуйста, включите в свой вопрос [MCVE] (/ help/mcve). – Sumurai8

+0

Извините за это. Я сделал некоторую работу для своей фигуры, но она не может работать хорошо. –

ответ

2

Сюжет, на который вы ссылаетесь, не был составлен с использованием ggplot2, но с использованием lattice библиотеки. Вы можете найти несколько примеров использования lattice по адресу Quick-R website. Ниже я привожу пример кода, представленные на данном сайте и выходного участка:

library(lattice) 
attach(mtcars) 

gear.f<-factor(gear,levels=c(3,4,5), 
    labels=c("3gears","4gears","5gears")) 
cyl.f <-factor(cyl,levels=c(4,6,8), 
    labels=c("4cyl","6cyl","8cyl")) 

bwplot(cyl.f~mpg|gear.f, 
    ylab="Cylinders", xlab="Miles per Gallon", 
    main="Mileage by Cylinders and Gears", 
    layout=(c(1,3))) 

enter image description here

+0

Уважаемый downvoter - почему -1? – Tim

+2

Просто случайное предположение (мотивы голосования могут быть довольно случайными), но некоторым людям это не нравится, когда ужасные вопросы вознаграждаются хорошими ответами. Они считают, что это побуждает больше людей задавать ужасные вопросы. – joran

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