Несколько участков в плотностном участке - PullRequest
0 голосов
/ 18 января 2019

Я хочу создать график, используя график плотности, который имеет три строки данных для каждого из трех графиков друг над другом. Ниже приведен код, который я использую для добавления девяти строк данных к одному графику. Мне нужны первые три строки на верхнем графике, вторые три строки на среднем графике и последние три строки на нижнем графике.

densityPlot(DeerBC$radians, xscale = 24, xcenter = "noon", add = FALSE, rug = FALSE, extend = 'lightgrey', n.grid = 100, adjust = 0.2, main = "Deer Density Vs Time", xlab = "Time", ylab = "Density", col='black')              

densityPlot(DeerBT$radians, add=TRUE, col='grey')            
densityPlot(DeerBF$radians, add=TRUE, col='light grey')             
densityPlot(DeerDC$radians, add=TRUE, col='dark green')               
densityPlot(DeerDT$radians, add=TRUE, col='green')               
densityPlot(DeerDF$radians, add=TRUE, col='light green')               
densityPlot(DeerOC$radians, add=TRUE, col='red')                  
densityPlot(DeerOT$radians, add=TRUE, col='orange')                
densityPlot(DeerOF$radians, add=TRUE, col='yellow')             

legend ('topright', c("Before-Control","Before-Ontrail",'Before-Offtrail','During-Control','During-Ontrail','During-Offtrail','Open-Control','Open-Ontrail','Open-Offtrail'), lty = 1, col = c('black','grey','light grey','dark green', 'green','light green','red','orange','yellow'), bg = 'white')
...