Если я правильно понимаю, это простой случай поднабора. если dataset1
- это первый набор данных с 8 столбцами и пятью строками, вы можете просто выполнить подмножество, используя:
dataset2 <- dataset1[c(1,2),]
, где 1 и 2 - строки для хранения. Поскольку данных нет в наборе данных, вы можете построить график, используя векторы даты в качестве X и данные из набора данных2 для y.
Я сделал пример:
df <- data.frame (a=c(2,4,6,8,9),
b=c(1,5,7,9,10),
c=c(6,8,5,7,7),
d=c(1,2,3,4,5),
e=c(4,5,6,2,1),
f=c(2,5,4,7,1),
g=c(1,1,2,1,2),
h=c(5,6,5,5,5))
Vmin <- unlist(lapply(df, min))
Vmax <- unlist(lapply(df, max))
spread <- Vmax-Vmin
plot(spread, type = "o",pch=20, xaxt="n")
axis(1,1:8,colnames(df)) #or your date