Добавить текст на графике "Роза ветров"

Кто-нибудь знает, как добавить дополнительный текст и расширить его символ в любой желаемой позиции на графике «Роза ветров» в R? Я использую пакет openair для построения диаграммы «роза ветров».

Рассмотрим следующий код, который я использую:

windRose(ambala.march.12hrs, ws = "FFF", wd = "WD_Deg",key.header = "(km/h)"
     ,paddle = F,breaks = c(0,10,20,30,40,50,60)
     ,key = list(plot.style = c("ticks", "border"),
                 fit = "all", height = 1,width=0.5)
     ,key.footer = "(a)",par.settings=list(fontsize=list(text=20),cex=2))

dput(ambala.march.12hrs)

structure(list(Date = structure(c(1L, 35L, 68L, 102L, 136L, 170L, 
204L, 238L, 272L, 306L, 340L, 374L, 408L, 442L, 476L, 510L, 544L, 
578L, 612L, 646L, 680L, 714L, 748L, 782L, 815L, 849L, 883L, 917L, 
951L, 985L, 1019L, 2L, 36L,.... , .Label = c("01-03-1970", 
"01-03-1971", "01-03-1972", "01-03-1973", "01-03-1974", "01-03-1975", 
"01-03-1976", "01-03-1977", "01-03-1978", "01-03-1979", "01-03-1980", 
"01-03-1981", "01-03-1982", "01-03-1983",...), class = "factor"), DD = c(29L, 29L, 29L, 27L, 
18L, 27L, 25L, 0L, 29L, 9L, 27L, 29L, 18L, 5L, 20L, 29L, 27L, 
29L, 32L, 29L, 29L, 32L, 27L, 29L, 29L, 29L, 23L, 27L, 18L, 27L, 
27L, 32L, 29L, 5L, 32L, 36L, 32L, 32L, 32L, 32L, 32L, 32L, 32L, 
32L, 32L, 23L, 0L, 27L, 32L, 32L, 29L,......), 
    WD_Deg = c(290L, 290L, 290L, 270L, 180L, 270L, 250L, 0L, 
    290L, 90L, 270L, 290L, 180L, 50L, 200L, 290L, 270L, 290L, 
    320L, 290L, 290L, 320L, 270L, 290L, 290L, 290L, 230L, 270L, 
    180L, 270L, 270L, 320L, 290L, 50L, 320L, 360L, 320L, 320L, 
    320L, 320L, 320L, 320L, 320L,....)), .Names = c("Date", "DD", 
"FFF", "WD_Deg"), class = "data.frame", row.names = c(NA, -1052L
))

Я называю FFF скорость ветра и WD_Deg направление ветра в этом фрейме данных.

Любые предложения приветствуются.


r openair
person user2968058    schedule 09.10.2015    source источник
comment
Учитывая, что SO - это не служба написания кода, не могли бы вы предоставить нам часть своей работы, что вы пробовали и что сработало, а что не сработало? dput() ваших данных также очень полезны. Спасибо!   -  person Badger    schedule 10.10.2015
comment
Рассмотрим следующий код, который я использовал; windRose (ambala.march.12hrs, ws = FFF, wd = WD_Deg, key.header = (км / ч), весло = F, breaks = c (0,10,20,30,40,50,60), ключ = список (plot.style = c (галочки, граница), fit = all, height = 1, width = 0,5), key.footer = (a), par.settings = list (fontsize = list (text = 20), cex = 2))   -  person user2968058    schedule 10.10.2015
comment
При изменении заголовка вопроса в редактировать и внесении поправок можем ли мы получить dput(ambala.march) в вопросе, чтобы мы знали, что мы работаем с?   -  person Badger    schedule 10.10.2015
comment
В этом коде, написанном выше, я попытался увеличить размер key.footer из par.setting, но это не сработало. Можно ли развернуть только key.footer?   -  person user2968058    schedule 10.10.2015

Ответы (1)


arrow_upward
0
arrow_downward

key.header и key.footer используют drawOpenKey и поэтому не могут быть установлены независимо от шкалы.

From ? drawOpenKey:
Примечания: форматирование верхнего и нижнего колонтитула нельзя задать локально, вместо этого оно должно соответствовать тем, которые заданы в ярлыках.

Итак, краткий ответ: это невозможно. Длинный ответ заключается в том, что вы можете попробовать добавить свой текст как отдельный слой с помощью text.

person RHA    schedule 10.10.2015