Выражение ошибки с использованием label_parsed в facet_grid

Question

Кажется, что label_parsed Функция не работает, чтобы показать выражение для меток фигур в facet_grid (см. рисунок ниже).

файл данных здесь

Я ожидал, что CO2 покажет с индексом для 2. Это не так и вернул ошибку, когда я назвал цифру.

Ошибка при разборе (text = as.character(values))::1:10: неожиданная числовая константа 1: сценарий 2 ^

Тем не менее, когда я удалил одну из переменных 'effect' или 'ID' из facet_grid(), т.е. facet_grid(impact~., scales = "free", space = "fixed", labeller = label_parsed), тогда CO2 показала индекс правильно.

Что было не так в моем коде? кто-нибудь может мне помочь, пожалуйста? Заранее большое спасибо.

dat$impact <- factor(dat$impact, 
                     labels = c('GHG(kg CO[2]-e)', 'Fossil fuel (MJ LHV)', 
                                'Water stress (eq L)'))
f <- ggplot(dat, aes(impact, value), fill = stage) +
  facet_grid(impact~ID, scales = "free", space = "fixed", 
             labeller = label_parsed) +
  scale_colour_brewer("clarity")+
  theme(
    axis.title.x = element_blank(),
    axis.text.x = element_blank(),
    axis.ticks.x = element_blank())

f