Начало видеть сквозь ленты на временных рядах в R - PullRequest
2 голосов
/ 10 апреля 2020

Итак, я пытался вывести полупрозрачные ленты на сюжет временного ряда. Я сделал то же самое для гистограмм, используя ggplot, который был довольно эффективен, НО из-за размера данных, с которыми я работаю для временного ряда, я не могу напечатать его во фрейме данных (работая через Microsoft Excel, разделенный запятой файл значений загружен в R). Так что ищите либо возможность преобразовать это в информационный кадр, либо построить на нем полупрозрачные блоки.

Код и соответствующие сообщения об ошибках ниже.

plot(Nitrate_Interp~RiverWensum$Rdates, type="l", xlab="Time", ylab="Nitrate (mg N L)", las=1, 
col="black")
rect((RiverWensum$Rdates)-1,lower_yNr,(RiverWensum$Rdates)+1,upper_yNr, density=30, col="#FF000080", 
border="red")
#defining the colour
mycol <- rgb(225,0,0,max=225,alpha=125,names="red.5")
mycol
red.5 = "#FF000080"
#error given when script run:
Error in rgb(255, 0, 0, max = 220, alpha = 125, names = "red50") : 
colour intensity 1.15909, not in [0,1]

Заранее спасибо

1 Ответ

2 голосов
/ 10 апреля 2020

Функция rgb() имеет настройку maxColorValue, а не max, которую вы должны установить на выбранное вами максимальное значение (хотя, похоже, оно работает и не является вашей проблемой). Глядя на ошибку:

Error in rgb(255, 0, 0, max = 220...

... ваш максимум меньше значения красного, поэтому он не будет работать. 255/220> 1

...