[英]plot for double loop in R
我的問題是將for循環與R中的plot函數結合使用。我想在一個圖中繪制多個點。 我不知道我的功能出了什么問題。 有什么幫助嗎?
DATA
a x y z
149 1 1 0
153 1 1 10
160 1 1 10
149 1 2 0
153 1 2 0
160 1 2 10
149 2 1 0
153 2 1 0
160 2 1 5
149 2 2 0
153 2 2 0
160 2 2 5
PCH=0;
plot(c(142,169),c(0,11),type="n")
for(i in unique(DATA$x)) {
for(j in unique(DATA$y)) {
PCH=PCH+1
select <- DATA[i,j]
X = DATA[select,"a"];
Y = DATA[select,"z"]
points(X,Y,pch=PCH)
}
}
這是不是偶然地實現了您想要實現的目標?
plot(z~a,data=DATA,
pch=as.numeric(interaction(x,y)),
xlim=c(142,169),ylim=c(0,11))
您的選擇是錯誤的。 嘗試以下代碼:
PCH <- 0
plot(c(142,169), c(0,11), type="n")
for(i in unique(DATA$x)) {
for(j in unique(DATA$y)) {
PCH <- PCH+1
select <- DATA$x == i & DATA$y == j
X <- DATA[select,"a"]
Y <- DATA[select,"z"]
points(X,Y,pch=PCH)
}
}
請注意,使用<-
代替=
會是更好的樣式,因為=
還會在具有其他語法含義的其他目的中使用。 此外,您不需要;
在R行的末尾
您的X和Y值已關閉..您不需要select語句
plot(c(142,169),c(0,11),type="n")
for(i in unique(DATA$x)) {
for(j in unique(DATA$y)) {
PCH=PCH+1
X = DATA[(DATA$x==i) & (DATA$y==j),"a"];
Y = DATA[(DATA$x==i) & (DATA$y==j),"z"]
(points(X,Y,pch=PCH))
}
}
聲明:本站的技術帖子網頁,遵循CC BY-SA 4.0協議,如果您需要轉載,請注明本站網址或者原文地址。任何問題請咨詢:yoyou2525@163.com.