Подтвердить что ты не робот

Как бороться с ошибкой "данных класса uneval" от ggplot2?

При попытке наложить новую строку на существующий ggplot я получаю следующую ошибку:

Error: ggplot2 doesn't know how to deal with data of class uneval

Первая часть моего кода работает нормально. Ниже приведен образ "недавних" почасовых данных по генерации ветра с рынка электроэнергии на Среднем Западе Соединенных Штатов.

Recent Hourly Wind Data

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

Любая помощь будет принята с благодарностью.

Ниже приведен воспроизводимый пример:

# Read in Wind data
fname <- "https://www.midwestiso.org/Library/Repository/Market%20Reports/20130510_hwd_HIST.csv"
df <- read.csv(fname, header=TRUE, sep="," , skip=7)
df <- df[1:(length(df$MKTHOUR)-5),]

# format variables
df$MWh <- as.numeric(df$MWh)
df$Datetime <- strptime(df$MKTHOUR, "%m/%d/%y %I:%M %p")

# Create some variables
df$Date  <- as.Date(df$Datetime)
df$HrEnd <- df$Datetime$hour+1

# Subset recent and last data
last.obs  <- range(df$Date)[2]
df.recent <- subset(df, Date %in% seq(last.obs-30, last.obs-2, by=1))
df.last   <- subset(df, Date %in% seq(last.obs-2,  last.obs,   by=1))

# plot recent in Grey
p <- ggplot(df.recent, aes(HrEnd, MWh, group=factor(Date))) + 
  geom_line(color="grey") +
  scale_y_continuous(labels = comma) + 
  scale_x_continuous(breaks = seq(1,24,1)) +
  labs(y="MWh") + 
  labs(x="Hour Ending") + 
  labs(title="Hourly Wind Generation")    
p

# plot last two days in Red
p <- p + geom_line(df.last, aes(HrEnd, MWh, group=factor(Date)), color="red")  
p
4b9b3361

Ответ 1

когда вы добавляете новый набор данных в геометрию, вам нужно использовать аргумент data=. Или поставьте аргументы в правильном порядке mapping=..., data=.... Взгляните на аргументы для ?geom_line.

Таким образом:

p + geom_line(data=df.last, aes(HrEnd, MWh, group=factor(Date)), color="red") 

Или:

p + geom_line(aes(HrEnd, MWh, group=factor(Date)), df.last, color="red") 

Ответ 2

Другая причина - случайное размещение data=... внутри aes(...) вместо внешнего:

RIGHT:
ggplot(data=df[df$var7=='9-06',], aes(x=lifetime,y=rep_rate,group=mdcp,color=mdcp) ...)

WRONG:
ggplot(aes(data=df[df$var7=='9-06',],x=lifetime,y=rep_rate,group=mdcp,color=mdcp) ...)

В частности, это может произойти, когда вы прототипируете команду plot с помощью qplot(), которая не использует явный aes(), а затем редактирует/копирует и вставляет ее в ggplot()

qplot(data=..., x=...,y=..., ...)

ggplot(data=..., aes(x=...,y=...,...))

Жаль, что сообщение об ошибке ggplot не пропустило аргумент "data"! вместо этой загадочной глупости, потому что это часто означает это сообщение.

Ответ 3

Это также может произойти, если вы ссылаетесь на переменную в data.frame, которая не существует. Например, недавно я забыл сказать ddply, чтобы суммировать одну из моих переменных, которые я использовал в geom_line, чтобы указать цвет линии. Затем ggplot не знал, где найти переменную, которую я не создал в сводной таблице, и я получил эту ошибку.