Datenpunkte sind an der falschen Stelle auf meinem R-Plot

Question

Ich habe zwei Spalten von Daten in einem Streudiagramm zu plotten, scheinen die Punkte nicht an der richtigen Stelle zu sein, als ob die Achse verschoben werden und die Datenpunkte wurden neu bestellt. Die Daten stammen von einem größeren Satz und der Plan war, "Linien" zu verwenden, um weitere Linien zum Plot hinzuzufügen. Ich habe R lange nicht verwendet und folge den Liniendiagrammen auf der QuickR-Website. Die Daten wurden bereits sortiert und sollten eine Verteilungskurve ergeben. Der Plan ist, den R-Code innerhalb von knime zu verwenden, wenn/wann es funktioniert.

dies meine Daten und Code

1     | 0.2 |     ? 
2     | 0.3 |0.9040357526438414 
3     | 0.4 |5.411174917770767 
4     | 0.5 |6.680564306410919 
5     | 0.6 |6.209330779324634 
6     | 0.7 |6.064339545114229 
7     | 0.8 |6.689841006370736 
8     | 0.9 |8.755978393214562 
9     | 1.0 |13.11661304772278 
10     | 1.1 |17.093411510054928 
11     | 1.2 |15.479560872141883 
12     | 1.3 |8.420296969382726 
13     | 1.4 |3.5346457261075566 
14     | 1.5 |1.6256413200367157 
15     | 1.6 |2.2848049576096026 
16     | 1.7 |1.2394427974974978 
17     | 1.8 |0.28169014084507044 
18     | 1.9 |     ? 
19     | 2.0 |     ? 
20     | 2.1 |     ? 
21     | 2.2 |     ? 
22     | 2.3 |     ? 
23     | 2.4 |     ? 
24     | 2.5 |     ? 
25     | 2.6 |     ? 
26     | 2.7 |     ? 
27     | 2.8 |     ? 
28     | 2.9 |     ? 

nwells=c(2, 6, 10, 14, 18) #to take the columns I want from the larger dataset 
plot(3, 20, type="n", xlim=c(0, 3), ylim=c(0, 26), xlab="Intensity", 
   ylab="Proportion", xaxs="i", yaxs="i") 
colors <- rainbow(length(nwells)) 
linetype <- c(1:length(nwells)) 
plotchar <- seq(nwells) 

# add lines 

   well <- data1[2] 
    bin <-data1[1] 
    data<-data.frame(bin, well) 
   lines(data, type="p", lwd=1.5, 
     lty=1, col=colors[n], pch=plotchar[n], grid()) 

das ist mein Grundstück distribution scatter plot 1 sample from R

Anmerkung der Punkt bei 1,5, 5 - woher das in diesem Datensatz kommt?

jemand eine Idee, was ich falsch mache?

Answer 1

Ich denke, es gibt einige Probleme ist aufgrund falsche Konvertierung von Faktor-numerischen Variable in der Datenspalte 2, die folgenden Fehler beheben soll (nicht der Punkt 1.5, 5 nicht mehr da):

data[,2] <- as.numeric(as.character(data[,2])) 
well <- data1[2] 
bin <-data1[1] 
data<-data.frame(bin, well) 
lines(data, type="p", lwd=2.5, 
     lty=1, col=colors, pch=plotchar, grid())