R, неправильный вывод из ggplot2 и facet_wrap при использовании пространственных данных

Я пытаюсь создать визуализацию Великобритании для разных периодов времени, где заполнение для каждого региона зависит от числовой переменной. Когда я разделяю фрейм данных по периоду времени и независимо создаю диаграммы в ggplot2, они верны. Однако, когда я использую функцию facet_wrap, чтобы они отображались на одном графике, выходные данные неверны (числа для каждого региона не верны).

(Обратите внимание, я пытался следовать этому руководству для пространственных данных в R как можно ближе: http://spatial.ly/2013/12/introduction-spatial-data-ggplot2/)

Команда, которую я пытаюсь использовать:

Map <- ggplot(data, aes(long, lat, group = group, fill = data$numericvariable)) 
+ geom_polygon() + coord_equal() + facet_wrap(~Date.ordered) + 
scale_fill_gradientn(limits = c(55,70),colours=c("white","red"))

Данные - это пространственные данные, которые были приведены к кадру данных с помощью команды fortify.

Вывод работает независимо, когда я использую следующие команды:

data.split<-split(data,data$Date.ordered)

Maps<-list()

for (i in 1:length(data.split){

    Maps[[i]]<- ggplot(data.split[[i]], aes(long, lat, group = group, 
    fill = data.split[[i]]$numericvariable)) + geom_polygon() + coord_equal() + 
    scale_fill_gradientn(limits = c(55,70),colours=c("white","red"))

    print(Maps[[i]])
}

Но это очень трудно привести в одну визуализацию, даже используя мультиплот.

Поскольку визуализации работают правильно, когда они выполняются независимо, в настоящее время я предполагаю, что это ошибка кодирования от моего имени, а не проблема с данными, но я могу опубликовать пример того, как выглядят данные, если это поможет.

Благодарю.

0 ответов

Другие вопросы по тегам