LocA<-(Graphdata[["Loc==AB"]])
plot(0, 0, xlim = c(1, 20), ylim = c(70, 200), asp=NA, xlab = "", ylab = "", type = "n")
lines(LocA$K,type="l",col="blue",lwd=2)
lines(LocA$L,type="l",col="green",lwd=2)
lines(LocA$M,type="l",col="red",lwd=2)
lines(LocA$N,type="l",col="orange",lwd=2)
И я хочу, чтобы ось x = охватывала диапазон от 1:20, как это задано xlim = C (1:20), но не распространяется на этот диапазон, и график выглядит заткнутым, и этоне превышает 10, но предполагается, что он охватывает диапазон, заданный D. Часть данных и график для этих данных приведены ниже:
Loc D K L M N
1 AB 1 95.03813 110.4466 NA NA
2 AB 3 82.36166 154.3045 NA NA
3 AB 5 81.08041 118.5903 NA NA
4 AB 7 82.40850 110.6272 87.89905 NA
5 AB 9 83.94922 105.1753 NA 82.28767
6 AB 11 84.94135 102.8754 NA 77.83648
7 AB 13 85.835855 101.209326 80.077513 75.355855
8 AB 15 86.309016 100.978860 79.784663 75.128083
9 AB 17 87.792539 99.914197 78.878135 75.121244