Правильные имена на шпалерах уровней - PullRequest
2 голосов
/ 25 мая 2011

Я пытаюсь создать решетку из нескольких графиков уровней. Теперь у меня есть 2 вопроса. Вот некоторые примеры

library(lattice)
require(stats)
attach(environmental)
ozo.m <- loess((ozone^(1/3)) ~ wind * temperature * radiation,
    parametric = c("radiation", "wind"), span = 1, degree = 2)
w.marginal <- seq(min(wind), max(wind), length.out = 50)
t.marginal <- seq(min(temperature), max(temperature), length.out = 50)
r.marginal <- seq(min(radiation), max(radiation), length.out = 4)
wtr.marginal <- list(wind = w.marginal, temperature = t.marginal,
        radiation = r.marginal)
grid <- expand.grid(wtr.marginal)
grid[, "fit"] <- c(predict(ozo.m, grid))
levelplot(fit ~ wind * temperature | radiation, data = grid,
        cuts = 10, region = TRUE,
        xlab = "Wind Speed (mph)",
        ylab = "Temperature (F)",
        main = "Cube Root Ozone (cube root ppb)")

Это создаст следующий график. enter image description here

1) Я хочу, чтобы заголовок каждого графика был не радиацией, а значением радиации (например, 7,334, ...)

2) Я хочу изменить тики с осей x и y на буквы вместо текущих чисел. (вместо 5-10-15-20 мне нужен E-J-O-T)

Можете ли вы, ребята, указать мне (еще раз) в правильном направлении?

1 Ответ

5 голосов
/ 25 мая 2011

с использованием

levelplot(fit ~ wind * temperature | as.factor(radiation), ... , scales= list(x=list(labels=c('','E','J','O','T'))))

помечает ваши графики значением радиации.аргумент scale можно использовать для указания разных меток.

...