wie zwischen jeder Zeile in einem Grundstück

Question

Lassen Sie sagen, ich habe ein Daten wie diese

M<- matrix(rnorm(20),20,5) 
x <- as.matrix(sort(runif(20, 5.0, 7.5))) 

Die M hat 5 Spalten mit den gleichen Werten ein Leerzeichen hinzuzufügen, die ich es darstellen möge, aber ich will nicht um sie aufeinander zu zeichnen. Ich möchte sie mit einem Leerzeichen zeigen. Was ich tue, ist wie unten

plot(x, M[,1], ylim=range(M), ann=FALSE, axes=T,type="l") 
Colm <- 2:ncol(M) 
lapply(seq_along(Colm),function(i){ 
    lines(x, M[,i], col=Colm[i]) 
}) 

Gibt es eine Möglichkeit, einen Abstand zwischen jeder Zeile in Handlung zu machen?

Answer 1

Sie können jedem y-Wert eine kleine Änderung hinzufügen, um jede Zeile leicht zu verschieben.

set.seed(595) 
M <- matrix(rnorm(20),20,5) 
x <- as.matrix(sort(runif(20, 5.0, 7.5))) 

plot(NA, ylim=range(M), xlim=range(x), ann=FALSE, axes=T, type="l") 

# Amount by which to shift each y value 
eps = seq(-0.1, 0.1, length.out=ncol(M)) 

lapply(1:ncol(M), function(i){ 
    lines(x, M[,i] + eps[i], col=i) 
}) 

UPDATE: In Antwort auf Ihren Kommentar, ich denke, die folgende ist wahrscheinlich das, was passiert ist: In Ihrem Beispielcode ist x eine Matrix, die im wesentlichen das gleiche wie ein Vektor verhält, wenn Die Matrix hat nur eine Spalte. Somit gibt x einen Datenvektor zurück, so dass Sie einfach das Objekt x direkt in der lines Funktion verwenden können. Wenn Sie jedoch sind x als Datenrahmen (zum Beispiel Import x=read.table("x.txt", header=TRUE) verwenden, dann müssen Sie lines(x[,1], M[,i] + eps[i], col=i) in Ihrem Code verwenden, um den Vektor der Daten in der ersten Spalte des Datenrahmens zu erhalten x.

Answer 2

wenn Sie ggplot Sie dies tun können leicht den alpha-Befehl wie in diesem Beitrag nicht angegeben:

Overlapping Lines in ggplot2

und man kann auch die Linien unter Verwendung von Code aus diesem Beitrag Jitter ..

How to jitter lines in ggplot2